--- 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.=' |
'."\n";
return $result;