--- rat/lonuserstate.pm 2003/10/29 21:21:08 1.64 +++ 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.64 2003/10/29 21:21:08 www Exp $ +# $Id: lonuserstate.pm,v 1.66 2003/11/01 16:37:22 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -73,7 +73,12 @@ sub putinversion { my $uri=shift; if ($hash{'version_'.$uri}) { my $version=$hash{'version_'.$uri}; - if ($version eq 'current') { return $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;