--- loncom/interface/lonparmset.pm 2009/11/05 18:10:37 1.477 +++ loncom/interface/lonparmset.pm 2009/11/06 10:14:12 1.478 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.477 2009/11/05 18:10:37 raeburn Exp $ +# $Id: lonparmset.pm,v 1.478 2009/11/06 10:14:12 amueller Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2197,9 +2197,7 @@ ENDPARMSELSCRIPT # Display Unit 1 "General Parameters" if (!$pssymb) { - #$r->print(&Apache::lonhtmlcommon::topic_bar (1,&mt('General Parameters'))); - $r->print('
'); - $r->print('

'.&mt('Resource Specification').'

'); + $r->print(&Apache::lonhtmlcommon::topic_bar (1,&mt('Resource Specification'))); $r->print(< // print(&Apache::lonhtmlcommon::row_closure(1)); $r->print(&Apache::lonhtmlcommon::end_pick_box()); $r->print('
'); - $r->print(''); #Display Unit 2 "Select Parameter" - #$r->print(&Apache::lonhtmlcommon::topic_bar (2,&mt('Select Parameters'))); - $r->print('
'); - $r->print('

'.&mt('Parameter Specification').'

'); + $r->print(&Apache::lonhtmlcommon::topic_bar (2,&mt('Parameter Specification'))); &displaymenu($r,\%allparms,\%allparts,\@pscat,\@psprt,\%keyorder); + $r->print(&Apache::lonhtmlcommon::topic_bar (3,&mt('User Specification (optional)'))); } else { + # parameter screen for a single resource. my ($map,$id,$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 (3,&mt('User Specification (optional)'),'no_number')); } - $r->print('
'); - #$r->print(&Apache::lonhtmlcommon::topic_bar (3,&mt('User Selection'))); - $r->print('
'); - $r->print('

'.&mt('User Specification (optional)').'

'); $r->print(&Apache::lonhtmlcommon::start_pick_box()); &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('
'); # parm selection is shown: display parm update button $r->print('

' @@ -2275,6 +2268,7 @@ COURSECONTENTSCRIPT .'' .'

' ); + # Display Messages $r->print('
'.$message.'
');