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

banghart lon-capa-cvs-allow@mail.lon-capa.org
Fri, 12 Oct 2007 20:06:54 -0000


banghart		Fri Oct 12 16:06:54 2007 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  	Saving work in progress. Display pickcode in table like other
  	Grade/Manage Scantron forms.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.456 loncom/homework/grades.pm:1.457
--- loncom/homework/grades.pm:1.456	Thu Oct 11 20:03:11 2007
+++ loncom/homework/grades.pm	Fri Oct 12 16:06:52 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.456 2007/10/12 00:03:11 banghart Exp $
+# $Id: grades.pm,v 1.457 2007/10/12 20:06:52 banghart Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4894,11 +4894,10 @@
     </tr>
 SCANTRONFORM
 
-    $r->print(<<SCANTRONFORM);
-  </table>
-$grading_menu_button
-SCANTRONFORM
-    &Apache::lonpickcode::code_list($r,1);
+    $r->print('<tr><td bgcolor="#777777">');
+    &Apache::lonpickcode::code_list($r,2);
+    $r->print('</td></tr></table>');
+    $r->print($grading_menu_button);
     return
 }