--- loncom/lonnet/perl/lonnet.pm 2003/11/10 20:27:32 1.443 +++ loncom/lonnet/perl/lonnet.pm 2003/11/10 21:50:21 1.444 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.443 2003/11/10 20:27:32 albertel Exp $ +# $Id: lonnet.pm,v 1.444 2003/11/10 21:50:21 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4069,7 +4069,8 @@ sub fixversion { &GDBM_READER(),0640)) { if ($bighash{'version_'.$uri}) { my $version=$bighash{'version_'.$uri}; - unless ($version eq 'mostrecent') { + unless (($version eq 'mostrecent') || + ($version==&getversion($uri))) { $uri=~s/\.(\w+)$/\.$version\.$1/; } }