--- loncom/interface/lonquickgrades.pm 2011/01/03 14:19:39 1.60
+++ loncom/interface/lonquickgrades.pm 2011/01/03 14:39:19 1.61
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Quick Student Grades Display
#
-# $Id: lonquickgrades.pm,v 1.60 2011/01/03 14:19:39 raeburn Exp $
+# $Id: lonquickgrades.pm,v 1.61 2011/01/03 14:39:19 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -121,12 +121,13 @@ sub startGradeScreen {
my $allowed_to_edit = &Apache::lonnet::allowed('mgr',$env{'request.course.id'});
if ($allowed_to_view) {
- $r->print('
');
- if ($notshowTotals) { $r->print (' '.&mt('Students do not see total points.').' '); }
- if ($notshowSPRSlink){ $r->print (' '.&mt('Students do not see link to spreadsheet.').' '); }
- if ($showPoints) { $r->print (' '.&mt('Students will see points based on problem weights.').' '); }
- if ($showCategories) { $r->print (' '.&mt('Students will see points based on categories.').' '); }
- $r->print(' '.&Apache::lonhtmlcommon::coursepreflink(&mt('Grade display settings'),'grading').'
');
+ my @notes;
+ push(@notes,&mt('Students do not see total points.')) if ($notshowTotals);
+ push(@notes,&mt('Students do not see link to spreadsheet.')) if ($notshowSPRSlink);
+ push(@notes,&mt('Students will see points based on problem weights.')) if ($showPoints);
+ push(@notes,&mt('Students will see points based on categories.')) if ($showCategories);
+ push(@notes, &Apache::lonhtmlcommon::coursepreflink(&mt('Grade display settings'),'grading'));
+ $r->print(&Apache::loncommon::head_subbox(join(' ',@notes)));
}