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

[www]

www		Mon Apr 12 13:11:42 2010 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  Fix call to scantron_selectphase
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.611 loncom/homework/grades.pm:1.612
--- loncom/homework/grades.pm:1.611	Mon Apr 12 12:55:18 2010
+++ loncom/homework/grades.pm	Mon Apr 12 13:11:42 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.611 2010/04/12 12:55:18 www Exp $
+# $Id: grades.pm,v 1.612 2010/04/12 13:11:42 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -7974,7 +7974,7 @@
 	}
     }
     if ($symb) {
-	$r->print(&scantron_selectphase($r,$uploadedfile));
+	$r->print(&scantron_selectphase($r,$uploadedfile,$symb));
     } else {
 	$r->print($doanotherupload);
     }
@@ -9322,7 +9322,7 @@
 	    $request->print(&csvuploadassign($request,$symb));
 	} elsif ($command eq 'scantron_selectphase' && $perm{'mgr'}) {
             &startpage($request,$symb);
-	    $request->print(&scantron_selectphase($request,$symb));
+	    $request->print(&scantron_selectphase($request,undef,$symb));
  	} elsif ($command eq 'scantron_warning' && $perm{'mgr'}) {
             &startpage($request,$symb);
  	    $request->print(&scantron_do_warning($request,$symb));