--- loncom/interface/lonparmset.pm 2003/06/30 20:24:26 1.113
+++ loncom/interface/lonparmset.pm 2003/07/17 15:16:45 1.117
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.113 2003/06/30 20:24:26 sakharuk Exp $
+# $Id: lonparmset.pm,v 1.117 2003/07/17 15:16:45 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -488,9 +488,15 @@ sub print_row {
sub print_td {
my ($r,$which,$defbg,$result,$outpar,$mprefix,$value,$typeoutpar,$display)=@_;
$r->print('
'.
- &plink($$typeoutpar[$which],$$display{$value},$$outpar[$which],
- $mprefix."$which",'parmform.pres','psub').' | '."\n");
+ ' align="center">');
+ if ($which<10) {
+ $r->print(&plink($$typeoutpar[$which],
+ $$display{$value},$$outpar[$which],
+ $mprefix."$which",'parmform.pres','psub'));
+ } else {
+ $r->print(&valout($$outpar[$which],$$typeoutpar[$which]));
+ }
+ $r->print(''."\n");
}
sub get_env_multiple {
@@ -852,7 +858,7 @@ sub assessparms {
$message.="Write Error: $1";
}
# ---------------------------------------------------------------- Done storing
- $message.='Changes can take up to 10 minutes before being active for all students
';
+ $message.='Changes can take up to 10 minutes before being active for all students.'.&Apache::loncommon::help_open_topic('Caching').'
';
}
# --------------------------------------------- Devalidate cache for this child
&Apache::lonnet::devalidatecourseresdata(
@@ -1474,6 +1480,10 @@ sub crsenv {
'description' => 'Course Description',
'courseid' => 'Course ID or number
'.
'(internal, optional)',
+ 'grading' => 'Grading'.
+ '"standard" or any other value. '.
+ 'Default for new courses is "standard".',
+
'default_xml_style' => 'Default XML Style File '.
'',
'problem_stream_switch'
=> 'Allow problems to be split over pages
'.
- ' ("yes" if allowed, anything else if not)',,
+ ' ("yes" if allowed, anything else if not)',
'anonymous_quiz'
=> 'Anonimous quiz/exam
'.
' (yes to avoid print students names )',
@@ -1531,9 +1541,12 @@ sub crsenv {
'when enrolling students',
'default_enrollment_end_date' => 'Default ending date '.
'when enrolling students',
- 'languages' => 'Languages used'
+ 'languages' => 'Languages used',
+ 'disable_receipt_display'
+ => 'Disable display of problem receipts
'.
+ ' ("yes" to disable, anything else if not)'
);
- my @Display_Order = ('url','description','courseid',
+ my @Display_Order = ('url','description','courseid','grading',
'default_xml_style','pageseparators',
'question.email','comment.email','policy.email',
'pch.roles.denied','pch.users.denied',
@@ -1541,6 +1554,7 @@ sub crsenv {
'languages',
'rndseed',
'problem_stream_switch',
+ 'disable_receipt_display',
'spreadsheet_default_classcalc',
'spreadsheet_default_studentcalc',
'spreadsheet_default_assesscalc',