--- loncom/interface/lonparmset.pm	2003/06/24 20:54:20	1.111
+++ loncom/interface/lonparmset.pm	2003/07/10 06:16:29	1.114
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.111 2003/06/24 20:54:20 sakharuk Exp $
+# $Id: lonparmset.pm,v 1.114 2003/07/10 06:16:29 www 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('<td bgcolor='.(($result==$which)?'"#AAFFAA"':$defbg).
-              ' align="center">'.
-              &plink($$typeoutpar[$which],$$display{$value},$$outpar[$which],
-                     $mprefix."$which",'parmform.pres','psub').'</td>'."\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('</td>'."\n");
 }
 
 sub get_env_multiple {
@@ -892,7 +898,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('<input type="hidden" value="'.$ENV{'form.url'}.
 #		  '" name="url"><input type="hidden" name="command" value="set">');
@@ -1517,7 +1527,7 @@ sub crsenv {
 	         => '<b>Randomization algorithm used</b> <br />'.
                     '<font color="red">Modifying this will make problems '.
                     'have different numbers and answers</font>',
-             'problem_split'
+             'problem_stream_switch'
                  => '<b>Allow problems to be split over pages</b><br />'.
                     ' ("<tt>yes</tt>" if allowed, anything else if not)',,
              'anonymous_quiz'