[LON-CAPA-cvs] cvs: loncom /homework grades.pm

[albertel]

albertel		Thu Mar  3 00:57:27 2005 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - some fiup to the column headers in grade by set mode
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.249 loncom/homework/grades.pm:1.250
--- loncom/homework/grades.pm:1.249	Mon Feb 28 16:18:08 2005
+++ loncom/homework/grades.pm	Thu Mar  3 00:57:26 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.249 2005/02/28 21:18:08 albertel Exp $
+# $Id: grades.pm,v 1.250 2005/03/03 05:57:26 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -96,7 +96,7 @@
 sub nameUserString {
     my ($type,$fullname,$uname,$udom) = @_;
     if ($type eq 'header') {
-	return '<b>&nbsp;Fullname&nbsp;</b><font color="#999999">(Username)</font>&nbsp;Section/Group';
+	return '<b>&nbsp;Fullname&nbsp;</b><font color="#999999">(Username)</font>';
     } else {
 	return '&nbsp;'.$fullname.'<font color="#999999">&nbsp;('.$uname.
 	    ($ENV{'user.domain'} eq $udom ? '' : ' ('.$udom.')').')</font>';
@@ -678,7 +678,7 @@
     my $loop = 0;
     while ($loop < 2) {
 	$gradeTable.='<td><b>&nbsp;No.</b>&nbsp;</td><td><b>&nbsp;Select&nbsp;</b></td>'.
-	    '<td>'.&nameUserString('header').'</td>';
+	    '<td>'.&nameUserString('header').'&nbsp;Section/Group</td>';
 	if ($ENV{'form.showgrading'} eq 'yes' && $submitonly ne 'all') {
 	    foreach (sort(@$partlist)) {
 		my $display_part=&get_display_part((split(/_/))[0],$url,$symb);