--- loncom/interface/lonparmset.pm 2009/11/14 17:29:13 1.482 +++ loncom/interface/lonparmset.pm 2009/12/03 17:50:42 1.488 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.482 2009/11/14 17:29:13 amueller Exp $ +# $Id: lonparmset.pm,v 1.488 2009/12/03 17:50:42 bisitz 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'}) @@ -1768,7 +1767,7 @@ sub mapmenu { } } # Show it ... - $r->print(&Apache::lonhtmlcommon::row_title(&mt('Select Enclosing Map or Folder'))); + $r->print(&Apache::lonhtmlcommon::row_title(&mt('Select Enclosing Map or Folder'),'','',' id="mapmenu"')); if ((ref($tree) eq 'ARRAY') && (ref($treeinfo) eq 'HASH')) { my $icon = ''; $r->print(&Apache::loncommon::start_data_table() @@ -2188,16 +2187,16 @@ function parmsel_show() { // ]]> ENDPARMSELSCRIPT - my $parmselhiddenstyle=' style="display:none"'; - if($env{'form.hideparmsel'} eq 'hidden') { - $r->print('
' + .'' + .'' + .'
'); + $r->print('print($parmselhiddenstyle); + } + $r->print('>' + .'' + .&mt('Change Parameter Selection') + .'' + .'
'); } else { # parameter screen for a single resource. - my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb); + my ($map,$iid,$resource)=&Apache::lonnet::decode_symb($pssymb); my $title = &Apache::lonnet::gettitle($pssymb); $r->print(&mt('Specific Resource: [_1] ([_2])',$title,$resource). ''. - ''
+ '
');
+ $r->print(&Apache::lonhtmlcommon::topic_bar('',&mt('Additional Display Specification (optional)')));
+ $r->print(&Apache::lonhtmlcommon::start_pick_box());
+ $r->print(&Apache::lonhtmlcommon::row_title(&mt('Select Parts to View')).
+ '');
+ &usermenu($r,$uname,$id,$udom,$csec,$cgroup,$parmlev,\@usersgroups);
+ $r->print(&Apache::lonhtmlcommon::row_closure(1));
+ $r->print(&Apache::lonhtmlcommon::end_pick_box());
+ $r->print('
' .'' .'' - .'
' - ); - - $r->print('print($parmselhiddenstyle); + .'
'); } - $r->print('>' - .'' - .&mt('Change Parameter Selection') - .'' - .'' - ); + # ----- End Parameter Selection # Display Messages $r->print('');
$r->print(' ');
#$r->print(' ');
- #$r->print('Step 1'); $r->print('');
$r->print(&Apache::lonhtmlcommon::start_pick_box());
&levelmenu($r,\%alllevs,$parmlev);
if ($parmlev ne 'general') {
- #$r->print(' ');
$r->print(&Apache::lonhtmlcommon::row_closure());
- &mapmenu($r,\%allmaps,$pschp,\%maptitles);
- #$r->print(' | ');
+ &mapmenu($r,\%allmaps,$pschp,\%maptitles,\%symbp);
}
$r->print(&Apache::lonhtmlcommon::row_closure(1));
$r->print(&Apache::lonhtmlcommon::end_pick_box());
$r->print(' |
');
$r->print(' ');
$r->print(' ');
$r->print(&Apache::lonhtmlcommon::start_pick_box());
@@ -3208,7 +3203,6 @@ ENDOVER
&parmboxes($r,\%allparms,\@pscat,\%keyorder);
$r->print(&Apache::lonhtmlcommon::start_pick_box());
$r->print(&Apache::lonhtmlcommon::row_title(&mt('Select Parts to View')));
- #$r->print(' | '.
$r->print('
|