--- loncom/interface/lonquickgrades.pm 2003/06/25 19:01:23 1.19 +++ loncom/interface/lonquickgrades.pm 2003/06/25 19:29:43 1.20 @@ -84,20 +84,15 @@ sub real_handler { my $title = $showPoints ? "Quick Points Display" : "Quick Completed Problems Display"; $r->print(&Apache::loncommon::bodytag($title, '', '')); - if ($showPoints) { - $r->print(<print(<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 detailed score sheet.

HEADER - } else { - $r->print(<This screen shows how many points you have. You can also look at -a detailed score sheet.

-HEADER } - $r->print("

This may take a few moments to display.

"); + $r->print("This may take a few moments to display."); $r->rflush(); @@ -147,7 +142,7 @@ HEADER $partsCount += $curRes->weight($part); if ($curRes->opendate($part) < $now) { - $totalPossible += $curRes->weight(); + $totalPossible += $curRes->weight($part); } $totalParts += $curRes->weight($part); } else { @@ -174,7 +169,6 @@ HEADER if ($depth == 1) { # in top-level only $topLevelParts += $partsCount; $topLevelRight += $partsRight; - $r->print($curRes->compTitle() . '
'); } # Crawl down stack and record parts correct and total @@ -204,8 +198,9 @@ HEADER my $indentString = '     '; # Second pass: Print the maps. - $r->print(''); - $r->print('' . "\n\n"); + $r->print('
SequenceDone / Total
'); + $title = $showPoints ? "Points Scored" : "Done"; + $r->print("" . "\n\n"); while ($depth > 0) { if ($curRes == $iterator->BEGIN_MAP()) {$depth++;} if ($curRes == $iterator->END_MAP()) { $depth--; }
Folder$title / Total