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

albertel lon-capa-cvs@mail.lon-capa.org
Wed, 08 Feb 2006 22:04:34 -0000


albertel		Wed Feb  8 17:04:34 2006 EDT

  Modified files:              
    /loncom/homework	bridgetask.pm 
  Log:
  - add in student username to regrade list
  
  
Index: loncom/homework/bridgetask.pm
diff -u loncom/homework/bridgetask.pm:1.101 loncom/homework/bridgetask.pm:1.102
--- loncom/homework/bridgetask.pm:1.101	Wed Feb  8 16:55:36 2006
+++ loncom/homework/bridgetask.pm	Wed Feb  8 17:04:34 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: bridgetask.pm,v 1.101 2006/02/08 21:55:36 albertel Exp $
+# $Id: bridgetask.pm,v 1.102 2006/02/08 22:04:34 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1443,10 +1443,12 @@
 		$seclist.='<input type="hidden" name="chosensections" 
                                value="'.$sec.'" />';
 	    }
+	    my $studentdis = $student;
+	    $studentdis =~ tr/:/@/;
 	    $result.=<<RESULT;
 <tr>
   <td>
-    <form method="POST">
+    <form style="display: inline" method="POST">
       <input type="hidden" name="gradingkey" value="$todo" />
       <input type="hidden" name="queue" value="$queue" />
       <input type="hidden" name="webgrade" value="no" />
@@ -1454,7 +1456,7 @@
       <input type="submit" name="submit" value="Regrade" />
       $seclist
     </form>
-  <td>$fullname->{$student}</td>
+  <td>$fullname->{$student} <tt>($studentdis)</tt></td>
   <td>
 RESULT
         }