--- loncom/interface/lonquickgrades.pm 2003/09/23 01:52:57 1.22.2.1 +++ loncom/interface/lonquickgrades.pm 2003/08/07 17:26:45 1.24 @@ -67,9 +67,7 @@ sub real_handler { $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'standard'; # Create the nav map - my $navmap = Apache::lonnavmaps::navmap->new( - $ENV{"request.course.fn"}.".db", - $ENV{"request.course.fn"}."_parms.db", 1, 0, 1); + my $navmap = Apache::lonnavmaps::navmap->new(); if (!defined($navmap)) { my $requrl = $r->uri; @@ -97,8 +95,6 @@ HEADER $r->rflush(); - $navmap->init(); - # End navmap using boilerplate my $iterator = $navmap->getIterator(undef, undef, undef, 1); @@ -150,11 +146,12 @@ HEADER } $totalParts += $curRes->weight($part); } else { - my $status = $curRes->status($part); + my $status = $curRes->getCompletionStatus($part); my $thisright = 0; $partsCount++; if ($status == $curRes->CORRECT || - $status == $curRes->EXCUSED) { + $status == $curRes->CORRECT_BY_OVERRIDE || + $status == $curRes->ANSWER_SUBMITTED) { $partsRight++; $totalRight++; $thisright = 1;