--- rat/lonuserstate.pm 2003/10/29 21:50:41 1.65 +++ rat/lonuserstate.pm 2003/11/01 16:37:22 1.66 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Construct and maintain state and binary representation of course for user # -# $Id: lonuserstate.pm,v 1.65 2003/10/29 21:50:41 www Exp $ +# $Id: lonuserstate.pm,v 1.66 2003/11/01 16:37:22 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -74,6 +74,11 @@ sub putinversion { if ($hash{'version_'.$uri}) { my $version=$hash{'version_'.$uri}; if ($version eq 'mostrecent') { return $uri; } + if ($version eq &Apache::lonnet::getversion( + &Apache::lonnet::filelocation('',$uri))) + { return $uri; } + &Apache::lonnet::logthis($uri.' '.$version.' '. &Apache::lonnet::getversion( + &Apache::lonnet::filelocation('',$uri))); $uri=~s/\.(\w+)$/\.$version\.$1/; } return $uri;