# The LearningOnline Network with CAPA # Wrapper for external and binary files as standalone resources # # (Edit Handler for RAT Maps # (TeX Content Handler # # 05/29/00,05/30 Gerd Kortemeyer) # 7/1,6/30 Gerd Kortemeyer) # # 7/5 Gerd Kortemeyer package Apache::lonwrapper; use strict; use Apache::Constants qw(:common); use Apache::lonnet(); use Apache::lonxml(); # ================================================================ Main Handler sub handler { my $r=shift; $r->content_type('text/html'); $r->send_http_header; return OK if $r->header_only; my $url=$r->uri; $url=~s/^\/adm\/wrapper//; $url=~s/^\/ext\//http\:\/\//; my $events='onLoad="'.&Apache::lonxml::loadevents. '" onUnload="'.&Apache::lonxml::unloadevents.'"'; my $script=&Apache::lonxml::registerurl(1); $r->print(< $script ENDDOCUMENT return OK; } 1; __END__