version 1.64, 2003/10/29 21:21:08
|
version 1.68, 2003/12/12 16:38:53
|
Line 73 sub putinversion {
|
Line 73 sub putinversion {
|
my $uri=shift; |
my $uri=shift; |
if ($hash{'version_'.$uri}) { |
if ($hash{'version_'.$uri}) { |
my $version=$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; } |
$uri=~s/\.(\w+)$/\.$version\.$1/; |
$uri=~s/\.(\w+)$/\.$version\.$1/; |
} |
} |
return $uri; |
return $uri; |
Line 161 sub loadmap {
|
Line 164 sub loadmap {
|
$turi='/adm/coursedocs/showdoc'.$turi; |
$turi='/adm/coursedocs/showdoc'.$turi; |
} |
} |
} else { # normal internal resource |
} else { # normal internal resource |
if (($embstyle eq 'img') || ($embstyle eq 'emb')) { |
my $mapdir=$uri; |
$turi='/adm/wrapper'.$turi; |
$mapdir=~s/[^\/]+$//; |
} |
$turi=&Apache::lonnet::hreflocation($mapdir,$turi); |
|
if (($embstyle eq 'img') || ($embstyle eq 'emb')) { |
|
$turi='/adm/wrapper'.$turi; |
|
} |
} |
} |
} |
} |
|
|