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

matthew lon-capa-cvs@mail.lon-capa.org
Thu, 17 Jul 2003 14:34:02 -0000


matthew		Thu Jul 17 10:34:02 2003 EDT

  Modified files:              
    /loncom/interface	lonquickgrades.pm 
  Log:
  Change logic for standard grading back to what it was before last commit.
  
  
Index: loncom/interface/lonquickgrades.pm
diff -u loncom/interface/lonquickgrades.pm:1.21 loncom/interface/lonquickgrades.pm:1.22
--- loncom/interface/lonquickgrades.pm:1.21	Thu Jul 17 10:31:17 2003
+++ loncom/interface/lonquickgrades.pm	Thu Jul 17 10:34:02 2003
@@ -63,11 +63,8 @@
     &Apache::loncommon::no_cache($r);
     $r->send_http_header;
 
-    my $showPoints = 1;
-    if (defined($ENV{'course.'.$ENV{'request.course.id'}.'.grading'}) &&
-        $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} ne 'standard') {
-        $showPoints = 0;
-    }
+    my $showPoints = 
+        $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'standard';
 
     # Create the nav map
     my $navmap = Apache::lonnavmaps::navmap->new(