[LON-CAPA-cvs] cvs: loncom /interface/spreadsheet classcalc.pm

matthew lon-capa-cvs@mail.lon-capa.org
Mon, 08 Dec 2003 19:39:08 -0000


matthew		Mon Dec  8 14:39:08 2003 EDT

  Modified files:              
    /loncom/interface/spreadsheet	classcalc.pm 
  Log:
  Output a count of the students when we present a page of links to student
  spreadsheets.
  
  
Index: loncom/interface/spreadsheet/classcalc.pm
diff -u loncom/interface/spreadsheet/classcalc.pm:1.16 loncom/interface/spreadsheet/classcalc.pm:1.17
--- loncom/interface/spreadsheet/classcalc.pm:1.16	Fri Nov 21 16:51:28 2003
+++ loncom/interface/spreadsheet/classcalc.pm	Mon Dec  8 14:39:08 2003
@@ -1,5 +1,5 @@
 #
-# $Id: classcalc.pm,v 1.16 2003/11/21 21:51:28 matthew Exp $
+# $Id: classcalc.pm,v 1.17 2003/12/08 19:39:08 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -314,6 +314,7 @@
 </p><p>
 <table border="2">
 <tr>
+  <th></th>
   <th>$header{'student'}</th>
   <th>$header{'username'}</th>
   <th>$header{'domain'}</th>
@@ -331,6 +332,7 @@
             '&sdomain='.$student->{'domain'}.'">';
         $student->{'section'} = 'none' if ($student->{'section'} eq '-1');
 	$r->print('<tr>'.
+                  '<td>'.$num_output.'</td>'.
 		  '<td>'.$link.$student->{'fullname'}.'</a></td>'.
 		  '<td>'.$link.$student->{'username'}.'</a></td>'.
 		  '<td>'.$student->{'domain'}  .'</td>'.