loncom/interface/lonquickgrades.pm - diff

Return to lonquickgrades.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.43.2.2, 2008/12/12 18:49:03	version 1.44, 2008/12/10 21:46:58
Line 82 sub real_handler {	Line 82 sub real_handler {

# Header	# Header
my $title = $showPoints ? "Points Display" : "Completed Problems Display";	my $title = $showPoints ? "Points Display" : "Completed Problems Display";
$r->print(&Apache::loncommon::start_page($title));	my @brcrum = [{href=>"/adm/quickgrades",text => "Points Display"}];
	$r->print(&Apache::loncommon::start_page($title,undef,{bread_crumbs => @brcrum}));

if (!$showPoints && !$notshowSPRSlink ) {	if (!$showPoints && !$notshowSPRSlink ) {
$r->print('<p>'	$r->print('<p>'
Line 255 sub real_handler {	Line 256 sub real_handler {
for (my $i = 1; $i < $depth; $i++) { $thisIndent .= $indentString; }	for (my $i = 1; $i < $depth; $i++) { $thisIndent .= $indentString; }

$r->print("$thisIndent$title</td>");	$r->print("$thisIndent$title</td>");
if ($totalAttempted) {	if ($totalAttempted) {
$r->print('<td valign="top">'	$r->print("<td valign='top'>$thisIndent<nobr>$correct / $attempted / $total</nobr></td>"
.$thisIndent	.&Apache::loncommon::end_data_table_row());
.'<span class="LC_nobreak">'	} else {
.$correct.' / '.$attempted.' / '.$total	$r->print("<td valign='top'>$thisIndent<nobr>$correct / $total</nobr></td>"
.'</span></td>');	.&Apache::loncommon::end_data_table_row());
} else {	}
$r->print('<td valign="top">'
.$thisIndent
.'<span class="LC_nobreak">'
.$correct.' / '.$total
.'</span></td>');
}
$r->print(&Apache::loncommon::end_data_table_row());
}	}
}	}