--- loncom/interface/lonpickcourse.pm	2006/03/16 21:54:40	1.41
+++ loncom/interface/lonpickcourse.pm	2006/04/10 21:40:09	1.42
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Pick a course
 #
-# $Id: lonpickcourse.pm,v 1.41 2006/03/16 21:54:40 albertel Exp $
+# $Id: lonpickcourse.pm,v 1.42 2006/04/10 21:40:09 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -96,10 +96,10 @@ sub handler {
                       ['-1','86400','604800','2592000','7776000',
 		      '15552000','31104000']));
 # if called from loncreateuser, report sections, then close
-    my ($loaditem,$seclist);
+    my (%loaditem,$seclist);
     my $num_sections = 0;
     if ($env{'form.form'} eq 'cu' && $env{'form.pickedcourse'}) {
-        $loaditem = 'onLoad="setSections()"';
+        $loaditem{'onload'} ="setSections()";
         my ($cdom,$cnum) = split/_/,$env{'form.pickedcourse'};
         my %sections_count = ();
         $num_sections = &Apache::loncommon::get_sections($cdom,$cnum,\%sections_count);
@@ -120,7 +120,7 @@ sub handler {
         $multelement = '<input type="hidden" name="multiple" value="'.$multiple.'" />';
     }
     $r->print(&Apache::loncommon::start_page($title,undef,
-					     {'add_entries' => $loaditem,
+					     {'add_entries' => \%loaditem,
 					      'no_nav_bar'  => 1, }));
     my %lt=&Apache::lonlocal::texthash(
 				       'cac' => 'Course Activity',