--- loncom/homework/grades.pm 2003/06/12 20:11:07 1.95
+++ loncom/homework/grades.pm 2003/06/13 15:43:28 1.96
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.95 2003/06/12 20:11:07 albertel Exp $
+# $Id: grades.pm,v 1.96 2003/06/13 15:43:28 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -466,8 +466,13 @@ LISTJAVASCRIPT
'onClick="javascript:checkSelect(this.form.stuinfo);" '.
'value="'.$viewgrade.'" />'."\n";
if ($ctr == 0) {
- $gradeTable='
'.
- 'No submission found for this resource.
';
+ my $num_students=(scalar(keys(%$fullname)));
+ if ($num_students eq 0) {
+ $gradeTable='
There are no students currently enrolled.';
+ } else {
+ $gradeTable='
'.
+ 'No submissions found for this resource for any students. ('.$num_students.' checked for submissions
';
+ }
} elsif ($ctr == 1) {
$gradeTable =~ s/type=checkbox/type=checkbox checked/;
}
@@ -1924,6 +1929,10 @@ sub viewgrades {
$result.=''."\n";
$result.=''."\n";
+ if (scalar(%$fullname) eq 0) {
+ my $colspan=3+scalar(@parts);
+ $result='There are no students in section "'.$ENV{'form.section'}.'" with enrollment status "'.$ENV{'form.status'}.'" to modify or grade.';
+ }
$result.=&show_grading_menu_form($symb,$url);
return $result;
}