rat/lonwrapper.pm - diff

Return to lonwrapper.pm CVS log

Up to [LON-CAPA] / rat

version 1.4, 2001/11/29 19:23:49	version 1.6, 2003/01/20 17:03:25
Line 52 sub handler {	Line 52 sub handler {
my $url=$r->uri;	my $url=$r->uri;
$url=~s/^\/adm\/wrapper//;	$url=~s/^\/adm\/wrapper//;
$url=~s/^\/ext\//http\:\/\//;	$url=~s/^\/ext\//http\:\/\//;
	if ($url=~/^\/uploaded\//) {
	$url=&Apache::lonnet::tokenwrapper($url);
	}
my $events='onLoad="'.&Apache::lonxml::loadevents.	my $events='onLoad="'.&Apache::lonxml::loadevents.
'" onUnload="'.&Apache::lonxml::unloadevents.'"';	'" onUnload="'.&Apache::lonxml::unloadevents.'"';
my $script=&Apache::lonxml::registerurl(1);	my $script=&Apache::lonxml::registerurl(1,undef);
$r->print(<<ENDDOCUMENT);	$r->print(<<ENDDOCUMENT);
<html>	<html>
<head>	<head>