--- loncom/interface/lonparmset.pm 2003/06/21 17:09:29 1.108
+++ loncom/interface/lonparmset.pm 2003/06/24 21:35:24 1.112
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.108 2003/06/21 17:09:29 www Exp $
+# $Id: lonparmset.pm,v 1.112 2003/06/24 21:35:24 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -855,9 +855,10 @@ sub assessparms {
$message.='
Changes can take up to 10 minutes before being active for all students
';
}
# --------------------------------------------- Devalidate cache for this child
- &Apache::lonnet::devalidatecourseresdata(
+ &Apache::lonnet::devalidatecourseresdata(
$ENV{'course.'.$ENV{'request.course.id'}.'.num'},
$ENV{'course.'.$ENV{'request.course.id'}.'.domain'});
+ &Apache::lonnet::clear_EXT_cache_status();
# -------------------------------------------------------------- Get coursedata
%courseopt = &Apache::lonnet::dump
('resourcedata',
@@ -891,7 +892,11 @@ sub assessparms {
&startpage($r,$id,$udom,$csec,$uname,$have_assesments);
- if (!$have_assesments) { return ''; }
+ if (!$have_assesments) {
+ untie(%bighash);
+ untie(%parmhash);
+ return '';
+ }
# if ($ENV{'form.url'}) {
# $r->print('');
@@ -1516,9 +1521,12 @@ sub crsenv {
=> 'Randomization algorithm used
'.
'Modifying this will make problems '.
'have different numbers and answers',
- 'problem_stream_switch'
+ 'problem_split'
=> '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 )',
'default_enrollment_start_date' => 'Default beginning date '.
'when enrolling students',
'default_enrollment_end_date' => 'Default ending date '.