--- rat/lonratmenu.pm 2004/11/17 18:39:20 1.1 +++ rat/lonratmenu.pm 2005/06/10 21:45:46 1.3 @@ -41,14 +41,17 @@ sub handler { $r->print(<$jsh>); my $loaditem = 'onUnload="leave();"'; my $bodytag=&Apache::loncommon::bodytag(undef,undef,$loaditem, - ($ENV{'environment.remote'} ne 'off')). + ($env{'environment.remote'} ne 'off')). &Apache::loncommon::help_open_menu('','Sequence_Advanced_Editor_Creation','Sequence_Advanced_Editor_Creation','',6,'RAT'); $r->print($bodytag); - $r->print(&print_html()); + my $readfile=$r->uri; + $readfile=~s/\/loadonly\/adveditmenu$//; + $r->print(&print_html($readfile)); return OK; } sub print_html { + my $readfile=shift; my $pagetext = <<"END";
@@ -60,6 +63,7 @@ sub print_html { +
Revert Undo RedoRecover deleted Search Import Copy