--- loncom/homework/grades.pm 2002/11/27 16:39:37 1.62 +++ loncom/homework/grades.pm 2002/12/02 17:28:51 1.63 @@ -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 @@ LISTJAVASCRIPT ''."\n". ''."\n". '
'."\n". - '
'."\n". + '
'."\n". ''."\n". ''."\n". 'To '.lc($viewgrade).' a submission, click on the check box next to the student\'s name. Then '."\n". @@ -1725,8 +1725,8 @@ sub viewstudentgrade { ''.$fullname.''. ''.$uname.''.$udom.''."\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};