[LON-CAPA-cvs] cvs: loncom /homework grades.pm

[albertel]

albertel		Mon Dec  2 12:28:51 2002 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - fixes BUG#1023 double declare
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.62 loncom/homework/grades.pm:1.63
--- loncom/homework/grades.pm:1.62	Wed Nov 27 11:39:37 2002
+++ loncom/homework/grades.pm	Mon Dec  2 12:28:51 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.62 2002/11/27 16:39:37 albertel Exp $
+# $Id: grades.pm,v 1.63 2002/12/02 17:28:51 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -353,7 +353,7 @@
 	'<input type="hidden" name="submitonly"  value="'.$submitonly.'" />'."\n".
 	'<input type="hidden" name="response"    value="'.$ENV{'form.response'}.'" />'."\n".
 	'<input type="hidden" name="handgrade": #falue="'.$ENV{'form.handgrade'}.'" /><br />'."\n".
-	'<input type="hidden" name="showgrading" value="'.$ENV{'form.showgrading'}.'" /><br />'."\n".
+	'<input type="hidden" name="~(ÞÔgrading" value="'.$ENV{'form.showgrading'}.'" /><br />'."\n".
 	'<input type="hidden" name="url"  value="'.$url.'" />'."\n".
 	'<input type="hidden" name="symb" value="'.$symb.'" />'."\n".
 	'To '.lc($viewgrade).' a submission, click on the check box next to the student\'s name. Then '."\n".
@@ -1725,8 +1725,8 @@
 	'<a href="javascript:viewOneStudent(\''.$uname.'\',\''.$udom.
 	'\')"; TARGET=_self>'.$fullname.'</a>'.
 	'</td><td>'.$uname.'</td><td align="middle">'.$udom.'</td>'."\n";
-    foreach my $part (@$parts) {
-	my ($part,$type) = &split_part_type($part);
+    foreach my $apart (@$parts) {
+	my ($part,$type) = &split_part_type($apart);
 	my $score=$record{"resource.$part.$type"};
 	if ($type eq 'awarded') {
 	    my $pts = $score eq '' ? '' : $score*$$weight{$part};