--- loncom/interface/lonquickgrades.pm	2011/01/03 14:39:19	1.61
+++ loncom/interface/lonquickgrades.pm	2011/01/10 00:06:28	1.62
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.61 2011/01/03 14:39:19 raeburn Exp $
+# $Id: lonquickgrades.pm,v 1.62 2011/01/10 00:06:28 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -133,7 +133,7 @@ sub startGradeScreen {
 
     $r->print("\n".'<ul class="LC_TabContentBigger" id="main">');
     $r->print("\n".'<li'.($mode eq 'quick'?' class="active"':'').'><a href="/adm/quickgrades"><b>&nbsp;&nbsp;&nbsp;&nbsp;'.
-                                          ($showPoints?&mt('Points Overview'):($showCategories?&mt('Grades Overview'):&mt('Completion Overview'))).
+                                          ($showPoints?&mt('Individual Points Overview'):($showCategories?&mt('Grades Overview'):&mt('Completion Overview'))).
                                           '&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>');
 
     if (!($showPoints || $notshowSPRSlink) || ($allowed_to_view)) {
@@ -403,6 +403,14 @@ sub outputCategories {
 
     my ($r,$showPoints,$notshowTotals,
            $navmap,$totalParts,$totalPossible,$totalRight,$totalAttempted,$topLevelParts,$topLevelRight,$topLevelAttempted)=@_;
+# Take care of storing and retrieving categories
+
+    my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
+    my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
+
+    my %categories=&Apache::lonnet::dump('grading_categories',$cdom,$cnum);
+# categories loaded now
+
 }
 
 # Pass this two refs to arrays for the start and end color, and a number