Return to lonquickgrades.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.37, 2005/12/20 15:02:13 | version 1.39, 2006/02/27 19:40:43 |
---|---|
Line 35 use POSIX; | Line 35 use POSIX; |
use Apache::loncommon; | use Apache::loncommon; |
use Apache::lonlocal; | use Apache::lonlocal; |
use Apache::lonnet; | use Apache::lonnet; |
use Apache::grades; | |
sub handler { | sub handler { |
my $r = shift; | my $r = shift; |
Line 157 HEADER | Line 158 HEADER |
$totalAttempted += $partsAttempted; | $totalAttempted += $partsAttempted; |
} | } |
} else { | } else { |
$score = $curRes->weight($part) * $curRes->awarded($part); | $score = &Apache::grades::compute_points($curRes->weight($part), $curRes->awarded($part)); |
} | } |
$partsRight += $score; | $partsRight += $score; |
$totalRight += $score; | $totalRight += $score; |