rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.66, 2003/11/01 16:37:22	version 1.69, 2003/12/15 15:26:26
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;
Line 165 sub loadmap {	Line 163 sub loadmap {
} elsif ($turi!~/\.(sequence\|page)$/) {	} elsif ($turi!~/\.(sequence\|page)$/) {
$turi='/adm/coursedocs/showdoc'.$turi;	$turi='/adm/coursedocs/showdoc'.$turi;
}	}
} else { # normal internal resource	} elsif ($turi) { # normal non-empty 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;
	}
}	}
}	}