--- loncom/interface/lonquickgrades.pm	2002/11/22 20:39:14	1.6
+++ loncom/interface/lonquickgrades.pm	2002/11/26 14:45:25	1.7
@@ -68,6 +68,12 @@ sub real_handler {
                         $ENV{"request.course.fn"}.".db",
                         $ENV{"request.course.fn"}."_parms.db", 1, 0);
 
+    if (!defined($navmap)) {
+        my $requrl = $r->uri;
+        $ENV{'user.error.msg'} = "$requrl:bre:0:0:Navamp initialization failed.";
+        return HTTP_NOT_ACCEPTABLE;
+    }
+
     # Keep this hash in sync with %statusIconMap in lonnavmaps; they
     # should match color/icon
     my $res = $navmap->firstResource(); # temp resource to access constants
@@ -82,6 +88,12 @@ sub real_handler {
     $r->print(&Apache::loncommon::bodytag('Quick Score Display','',
                                           ''));
 
+    $r->print(<<HEADER);
+<p>This screen shows how many problems (or problem parts) you have completed, and
+how many you have not yet done. You can also look at <a href="/adm/classcalc">a detailed
+score sheet</a>.</p>
+HEADER
+
     $navmap->init();
 
     # End navmap using boilerplate
@@ -107,7 +119,7 @@ sub real_handler {
         if ($curRes == $iterator->BEGIN_MAP()) {$depth++;}
         if ($curRes == $iterator->END_MAP()) { $depth--; }
 
-        if (ref($curRes) && $curRes->is_problem())
+        if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout)
         {
             # Get number of correct, incorrect parts
             my $parts = $curRes->parts();
@@ -151,7 +163,7 @@ sub real_handler {
     $iterator->next(); # ignore first BEGIN_MAP
     my $curRes = $iterator->next();
 
-    my @start = (255, 255, 0);
+    my @start = (255, 255, 192);
     my @end   = (0, 192, 0);
 
     my $indentString = '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';