[LON-CAPA-cvs] cvs: rat / lonratmenu.pm

[albertel]

albertel		Mon Apr 10 18:22:44 2006 EDT

  Modified files:              
    /rat	lonratmenu.pm 
  Log:
  - addentries to hash ref
  
  
Index: rat/lonratmenu.pm
diff -u rat/lonratmenu.pm:1.4 rat/lonratmenu.pm:1.5
--- rat/lonratmenu.pm:1.4	Tue Apr  4 11:42:39 2006
+++ rat/lonratmenu.pm	Mon Apr 10 18:22:41 2006
@@ -38,10 +38,10 @@
     my $jsh=Apache::File->new($include."/ratcode.js");
     $r->send_http_header('text/html');
     my $js = join('',<$jsh>);
-    my $loaditem = 'onUnload="leave();"';
+    my %loaditem = ('onunload' => "leave();",);
     my $start_page = 
 	&Apache::loncommon::start_page('Advanced Editor',$js,
-				       {'add_entries' => $loaditem,
+				       {'add_entries' => \%loaditem,
 					'only_body'   =>
 				       ($env{'environment.remote'} ne 'off')}).
 	&Apache::loncommon::help_open_menu('','Sequence_Advanced_Editor_Creation','Sequence_Advanced_Editor_Creation','',6,'RAT');