version 1.66, 2003/11/01 16:37:22
|
version 1.67, 2003/11/01 16:42:13
|
Line 77 sub putinversion {
|
Line 77 sub putinversion {
|
if ($version eq &Apache::lonnet::getversion( |
if ($version eq &Apache::lonnet::getversion( |
&Apache::lonnet::filelocation('',$uri))) |
&Apache::lonnet::filelocation('',$uri))) |
{ return $uri; } |
{ return $uri; } |
&Apache::lonnet::logthis($uri.' '.$version.' '. &Apache::lonnet::getversion( |
|
&Apache::lonnet::filelocation('',$uri))); |
|
$uri=~s/\.(\w+)$/\.$version\.$1/; |
$uri=~s/\.(\w+)$/\.$version\.$1/; |
} |
} |
return $uri; |
return $uri; |