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

[www]

www		Mon Feb  7 19:16:34 2011 EDT

  Modified files:              
    /loncom/homework	grades.pm 
    /loncom/interface	lonquickgrades.pm 
  Log:
  Easier way to get back to the problem grading menu
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.644 loncom/homework/grades.pm:1.645
--- loncom/homework/grades.pm:1.644	Mon Feb  7 00:53:10 2011
+++ loncom/homework/grades.pm	Mon Feb  7 19:16:28 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.644 2011/02/07 00:53:10 www Exp $
+# $Id: grades.pm,v 1.645 2011/02/07 19:16:28 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9200,7 +9200,7 @@
     unshift(@$crumbs,{href=>&href_symb_cmd($symb,'gradingmenu'),text=>"Grading"});
     $r->print(&Apache::loncommon::start_page('Grading',undef,
                                           {'bread_crumbs' => $crumbs}));
-    &Apache::lonquickgrades::startGradeScreen($r,'grading');
+    &Apache::lonquickgrades::startGradeScreen($r,($env{'form.symb'}?'probgrading':'grading'));
     unless ($nodisplayflag) {
        $r->print(&Apache::lonhtmlcommon::resource_info_box($symb,$onlyfolderflag));
     }
Index: loncom/interface/lonquickgrades.pm
diff -u loncom/interface/lonquickgrades.pm:1.65 loncom/interface/lonquickgrades.pm:1.66
--- loncom/interface/lonquickgrades.pm:1.65	Sun Jan 30 01:21:29 2011
+++ loncom/interface/lonquickgrades.pm	Mon Feb  7 19:16:34 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.65 2011/01/30 01:21:29 www Exp $
+# $Id: lonquickgrades.pm,v 1.66 2011/02/07 19:16:34 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -150,7 +150,14 @@
     }
     if ($allowed_to_edit) {
        $r->print("\n".'<li'.($mode eq 'grading'?' class="active"':'').'><a href="/adm/grades"><b>&nbsp;&nbsp;&nbsp;&nbsp;'.
-                                                                 &mt('Problem Grading').'&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>');
+                                                                 &mt('Content Grading').'&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>');
+       if ($env{'form.symb'}) {
+          $r->print("\n".'<li'.($mode eq 'probgrading'?' class="active"':'').'><a href="/adm/grades?symb='.
+                                              &Apache::lonhtmlcommon::entity_encode($env{'form.symb'}).
+                                              '&command=gradingmenu"><b>&nbsp;&nbsp;&nbsp;&nbsp;'.
+                                              &mt('Problem Grading').'&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>');
+
+       }
     }
     $r->print("\n".'</ul>'."\n");
     $r->print('<div class="LC_Box" style="clear:both;margin:0;"><div id="maincoursedoc" style="margin:0 0;padding:0 0;"><div class="LC_ContentBox" id="mainCourseDocuments" style="display: block;">');