--- loncom/homework/grades.pm 2002/09/20 23:35:30 1.49 +++ loncom/homework/grades.pm 2002/09/20 23:46:41 1.51 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.49 2002/09/20 23:35:30 albertel Exp $ +# $Id: grades.pm,v 1.51 2002/09/20 23:46:41 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -292,7 +292,7 @@ sub verifyreceipt { $contents. ''."\n"; } - return $string.&show_grading_menu_form ($symb,$url); + return $string.&show_grading_menu_form($symb,$url); } #--- This is called by a number of programs. @@ -436,14 +436,14 @@ LISTJAVASCRIPT $gradeTable.=''. '
'."\n"; + 'value="'.$viewgrade.'" />
'."\n"; if ($ctr == 0) { $gradeTable='
 '. 'No submission found for this resource.
'; - $gradeTable.=&show_grading_menu_form($symb,$url); } elsif ($ctr == 1) { $gradeTable =~ s/type=checkbox/type=checkbox checked/; } + $gradeTable.=&show_grading_menu_form($symb,$url); $request->print($gradeTable); return ''; } @@ -1145,6 +1145,7 @@ KEYWORDS $endform.='(Next and Previous do not save the scores.)'."\n" if ($ENV{'form.handgrade'} eq 'yes'); $endform.=''; + $endform.=&show_grading_menu_form($symb,$url); $request->print($endform); } return ''; @@ -2115,7 +2116,7 @@ sub view_edit_entire_class_form { my ($classlist,$sections) = &getclasslist('all','0'); my $result.='
'."\n"; $result.=''."\n"; + $result.=' Grade Entire Class'."\n"; $result.='
'."\n"; - $result.=' View/Grade Entire Section/Class
'."\n"; $result.='
'."\n". ''."\n". @@ -2128,7 +2129,7 @@ sub view_edit_entire_class_form { } } $result.='
'."\n"; + $result.=' '."\n"; $result.='
'."\n"; $result.='
'."\n"; return $result;