--- loncom/interface/lonquickgrades.pm 2003/07/17 14:31:17 1.21 +++ loncom/interface/lonquickgrades.pm 2003/09/23 01:52:57 1.22.2.1 @@ -63,11 +63,8 @@ sub real_handler { &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( @@ -153,12 +150,11 @@ HEADER } $totalParts += $curRes->weight($part); } else { - my $status = $curRes->getCompletionStatus($part); + my $status = $curRes->status($part); my $thisright = 0; $partsCount++; if ($status == $curRes->CORRECT || - $status == $curRes->CORRECT_BY_OVERRIDE || - $status == $curRes->ANSWER_SUBMITTED) { + $status == $curRes->EXCUSED) { $partsRight++; $totalRight++; $thisright = 1;