--- loncom/interface/lonparmset.pm 2009/11/14 17:47:18 1.483 +++ loncom/interface/lonparmset.pm 2010/01/30 17:35:10 1.492 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.483 2009/11/14 17:47:18 amueller Exp $ +# $Id: lonparmset.pm,v 1.492 2010/01/30 17:35:10 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -903,8 +903,7 @@ sub startpage { my ($r) = @_; my %loaditems = ('onunload' => "pclose()", - 'onload' => "group_or_section('cgroup')", - 'onload' => "showHide_courseContent()", + 'onload' => "showHide_courseContent(); group_or_section('cgroup')", ); if ((($env{'form.command'} eq 'set') && ($env{'form.url'}) @@ -1362,13 +1361,17 @@ ENDSCRIPT .'' ); } - $r->print('' - .'
' - .&mt('Show detailed Parameter Selection') - .'
' - ); + $r->print(''); + $r->print('' + .&mt('Show detailed Parameter Selection') + .'
' + ); $r->print(&Apache::lonhtmlcommon::row_closure(1)); } @@ -1494,13 +1497,24 @@ sub parmboxes { 'slots' => [], 'file_submission' => [], 'misc' => [], - ); + ); + my $hidelink = + '' + .'' + .&mt('Hide detailed Parameter Selection') + .'' + .'
' + ."\n"; +; foreach $tempparameter (keys %$allparms) { &whatIsMyCategory($tempparameter, \%categoryList); } #part to print the parm-list - $r->print('