--- loncom/interface/lonparmset.pm 2009/06/03 17:17:03 1.453 +++ loncom/interface/lonparmset.pm 2009/06/04 16:56:27 1.454 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.453 2009/06/03 17:17:03 schualex Exp $ +# $Id: lonparmset.pm,v 1.454 2009/06/04 16:56:27 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -854,7 +854,7 @@ sub page_js { return(< - +// $selscript ENDJS @@ -1248,6 +1249,7 @@ sub parmmenu { my $tempkey; $r->print(< +// ENDSCRIPT - $r->print(); $r->print(&Apache::lonhtmlcommon::row_title(&mt('Select Parameters to View'))); #part to print selected parms overview - $r->print('' - .'' - .''); - $r->print(''); - $r->print('' - .'

'.&mt('Selected Parameters').': '); - - #print out all possible parms and hide it - $r->print('

'); - $r->print('
    '); + $r->print(&mt('Selected Parameters:').'
    '); + + #print out all possible parms and hide them by default + $r->print('
      '); foreach $tempkey (&keysindisplayorder($allparms,$keyorder)) { $r->print('
    • print('style="display:none"'); + $r->print(' style="display:none"'); } - - $r->print('>'.($$allparms{$tempkey}=~/\s/ ? $$allparms{$tempkey} : $tempkey).'
    • '); - } - $r->print('('.&mt('add more parameter').')' - .'

'); + $r->print('>' + .($$allparms{$tempkey}=~/\s/ ? $$allparms{$tempkey} : $tempkey) + .'' + ); + } + $r->print('' + .'

' + .&mt('Show detailed Parameter Selection') + .'

' + ); &shortCuts($r,$allparms,$pscat,$keyorder); - $r->print(''); + $r->print(&Apache::lonhtmlcommon::row_closure(1)); } sub parmboxes { @@ -1372,8 +1372,11 @@ sub parmboxes { my $tempkey; #part to print the parm-list - $r->print('
'); + $r->print(''); } sub shortCuts { my ($r,$allparms,$pscat,$keyorder)=@_; @@ -1500,6 +1507,7 @@ sub usermenu { $sections .= ' '.&mt('or').' '; $sections .= qq| |; } else { $sections .= qq| |; } @@ -1565,7 +1576,6 @@ sub displaymenu { $r->print(&Apache::lonhtmlcommon::topic_bar (2,&mt('Select Parameters'))); $r->print(&Apache::lonhtmlcommon::start_pick_box()); &parmmenu($r,$allparms,$pscat,$keyorder); - #$r->print(&Apache::lonhtmlcommon::row_closure()); $r->print(&Apache::lonhtmlcommon::end_pick_box()); &parmboxes($r,$allparms,$pscat,$keyorder); $r->print(&Apache::lonhtmlcommon::start_pick_box()); @@ -2887,7 +2897,6 @@ ENDOVER $r->print('
'); $r->print(&Apache::lonhtmlcommon::start_pick_box()); &parmmenu($r,\%allparms,\@pscat,\%keyorder); - #$r->print(&Apache::lonhtmlcommon::row_closure()); $r->print(&Apache::lonhtmlcommon::end_pick_box()); &parmboxes($r,\%allparms,\@pscat,\%keyorder); $r->print(&Apache::lonhtmlcommon::start_pick_box());