--- loncom/interface/lonquickgrades.pm 2008/12/11 14:55:15 1.45 +++ loncom/interface/lonquickgrades.pm 2009/05/16 23:21:00 1.48 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Quick Student Grades Display # -# $Id: lonquickgrades.pm,v 1.45 2008/12/11 14:55:15 bisitz Exp $ +# $Id: lonquickgrades.pm,v 1.48 2009/05/16 23:21:00 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -81,9 +81,11 @@ sub real_handler { my $res = $navmap->firstResource(); # temp resource to access constants # Header - my $title = $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})); + 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('

' @@ -295,8 +297,8 @@ sub real_handler { $title = $showPoints ? "Points" : "Parts Done"; my $totaltitle = $showPoints ? &mt("Awarded Total Points") : &mt("Total Parts Done"); $r->print(&Apache::loncommon::start_data_table_row() - .''.$totaltitle.': '.$totalRight.'
'); - $r->print(&mt("Max Possible To Date")." $maxHelpLink: $totalPossible
"); + .''.$totaltitle.': '.$totalRight.'
'); + $r->print(&mt('Max Possible To Date')." $maxHelpLink: $totalPossible
"); $title = $showPoints ? "Points" : "Parts"; $r->print(&mt("Total $title In Course").': '.$totalParts.'' .&Apache::loncommon::end_data_table_row());