|
version 1.4, 2001/11/29 19:23:49
|
version 1.5, 2002/03/06 15:00:55
|
|
Line 54 sub handler {
|
Line 54 sub handler {
|
| $url=~s/^\/ext\//http\:\/\//; |
$url=~s/^\/ext\//http\:\/\//; |
| 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> |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonwrapper.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat