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

www www@source.lon-capa.org
Fri, 16 Apr 2010 18:29:33 -0000


www		Fri Apr 16 18:29:33 2010 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  Forgotten breadcrumbs
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.619 loncom/homework/grades.pm:1.620
--- loncom/homework/grades.pm:1.619	Wed Apr 14 15:04:58 2010
+++ loncom/homework/grades.pm	Fri Apr 16 18:29:33 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.619 2010/04/14 15:04:58 www Exp $
+# $Id: grades.pm,v 1.620 2010/04/16 18:29:33 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9211,7 +9211,8 @@
             &startpage($request,$symb,[{href=>&href_symb_cmd($symb,"table"), text=>"Grading table"},{href=>'', text=>"Modify grades"}]);
 	    $request->print(&viewgrades($request,$symb));
 	} elsif ($command eq 'handgrade' && $perm{'mgr'}) {
-            &startpage($request,$symb);
+            &startpage($request,$symb,[{href=>'',text=>'...'},
+                                       {href=>'',text=>'Store grades'}]);
 	    $request->print(&processHandGrade($request,$symb));
 	} elsif ($command eq 'editgrades' && $perm{'mgr'}) {
             &startpage($request,$symb,[{href=>&href_symb_cmd($symb,"table"), text=>"Grading table"},
@@ -9293,7 +9294,7 @@
             &startpage($request,$symb,[{href=>'', text=>'Grade/Manage/Review Bubblesheets'}],1,1);
             $request->print(&checkscantron_results($request,$symb));     
 	} elsif ($command) {
-            &startpage($request,$symb);
+            &startpage($request,$symb,[{href=>'', text=>'Access denied'}]);
 	    $request->print('<p class="LC_error">'.&mt('Access Denied ([_1])',$command).'</p>');
 	}
     }