--- loncom/interface/lonquickgrades.pm 2008/12/12 18:44:32 1.43.2.1 +++ loncom/interface/lonquickgrades.pm 2009/02/26 16:17:30 1.47 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Quick Student Grades Display # -# $Id: lonquickgrades.pm,v 1.43.2.1 2008/12/12 18:44:32 raeburn Exp $ +# $Id: lonquickgrades.pm,v 1.47 2009/02/26 16:17:30 schafran Exp $ # # Copyright Michigan State University Board of Trustees # @@ -81,8 +81,11 @@ sub real_handler { my $res = $navmap->firstResource(); # temp resource to access constants # Header - my $title = $showPoints ? "Points Display" : "Completed Problems Display"; - $r->print(&Apache::loncommon::start_page($title)); + my $title = "Grading and Statistics";#$showPoints ? "Points Display" : "Completed Problems Display"; + my $brcrum = [{href=>"/adm/quickgrades",text => "Points Display"}]; + $r->print(&Apache::loncommon::start_page($title,undef, + {'bread_crumbs' => $brcrum}) + ); if (!$showPoints && !$notshowSPRSlink ) { $r->print('

' @@ -255,22 +258,22 @@ sub real_handler { for (my $i = 1; $i < $depth; $i++) { $thisIndent .= $indentString; } $r->print("$thisIndent$title"); - if ($totalAttempted) { - $r->print('' + if ($totalAttempted) { + $r->print('' .$thisIndent .'' .$correct.' / '.$attempted.' / '.$total .'' .&Apache::loncommon::end_data_table_row() ); - } else { - $r->print('' + } else { + $r->print('' .$thisIndent .'' .$correct.' / '.$total .'' .&Apache::loncommon::end_data_table_row()); - } + } } }