--- loncom/interface/lonparmset.pm 2006/06/23 03:14:00 1.314 +++ loncom/interface/lonparmset.pm 2006/06/26 22:22:48 1.318 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.314 2006/06/23 03:14:00 albertel Exp $ +# $Id: lonparmset.pm,v 1.318 2006/06/26 22:22:48 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1057,15 +1057,15 @@ sub parmmenu { ENDSCRIPT $r->print(); - $r->print("\n
'); $cnt++; if ($cnt==3) { $r->print(" | |||||||||||||||||||||||||||||||||
+ | |||||||||||||||||||||||||||||||||
Select All Select Common Only | @@ -2078,6 +2078,10 @@ sub crsenv { } } } + + my $start_table =&Apache::loncommon::start_data_table(); + my $start_header_row=&Apache::loncommon::start_data_table_header_row(); + my $end_header_row =&Apache::loncommon::end_data_table_header_row(); # ------------------------- Re-init course environment entries for this session &Apache::lonnet::coursedescription($env{'request.course.id'}, @@ -2243,13 +2247,15 @@ sub crsenv { } } } + foreach my $parameter (@Display_Order) { my $description = $descriptions{$parameter}; # onchange is javascript to automatically check the 'Set' button. my $onchange = 'onFocus="javascript:window.document.forms'. "['envform'].elements['".$parameter."_setparmval']". '.checked=true;"'; - $output .= ' | ||||||||||||||||||||||||||||||||
'.$description.' | '; + $output .= &Apache::loncommon::start_data_table_row(). + ''.$description.' | '; if ($parameter =~ /^default_enrollment_(start|end)_date$/) { $output .= ''. &Apache::lonhtmlcommon::date_setter('envform', @@ -2266,17 +2272,19 @@ sub crsenv { $output .= ' | '. &Apache::lonhtmlcommon::checkbox($parameter.'_setparmval'). ' | '; - $output .= "||||||||||||||||||||||||||||||
'.&mt('Create New Environment Variable').' '. + $output.=&Apache::loncommon::start_data_table_row(). + ' | '.&mt('Create New Environment Variable').' '. ' | '. ' | '. - ' |
$lt{'par'} | $lt{'val'} | $lt{'set'}? | $lt{'par'} | $lt{'val'} | $lt{'set'}? | +$end_header_row $output -
---|
');
+ $r->print('
|