[BACK]Return to lonquickgrades.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonquickgrades.pm between versions 1.44 and 1.47

version 1.44, 2008/12/10 21:46:58 version 1.47, 2009/02/26 16:17:30
Line 81  sub real_handler { Line 81  sub real_handler {
     my $res = $navmap->firstResource(); # temp resource to access constants      my $res = $navmap->firstResource(); # temp resource to access constants
     
     # Header      # Header
     my $title = $showPoints ? "Points Display" : "Completed Problems Display";      my $title = "Grading and Statistics";#$showPoints ? "Points Display" : "Completed Problems Display";
  my @brcrum = [{href=>"/adm/quickgrades",text => "Points Display"}];      my $brcrum = [{href=>"/adm/quickgrades",text => "Points Display"}];
     $r->print(&Apache::loncommon::start_page($title,undef,{bread_crumbs => @brcrum}));      $r->print(&Apache::loncommon::start_page($title,undef,
                                               {'bread_crumbs' => $brcrum})
                );
   
     if (!$showPoints && !$notshowSPRSlink ) {      if (!$showPoints && !$notshowSPRSlink ) {
         $r->print('<p>'          $r->print('<p>'
Line 257  sub real_handler { Line 259  sub real_handler {
                                   
                 $r->print("$thisIndent$title</td>");                  $r->print("$thisIndent$title</td>");
  if ($totalAttempted) {   if ($totalAttempted) {
     $r->print("<td valign='top'>$thisIndent<nobr>$correct / $attempted / $total</nobr></td>"      $r->print('<td valign="top">'
                              .&Apache::loncommon::end_data_table_row());                               .$thisIndent
                                .'<span class="LC_nobreak">'
                                .$correct.' / '.$attempted.' / '.$total
                                .'</span></td>'
                                .&Apache::loncommon::end_data_table_row()
                       );
  } else {   } else {
     $r->print("<td valign='top'>$thisIndent<nobr>$correct / $total</nobr></td>"      $r->print('<td valign="top">'
                                .$thisIndent
                                .'<span class="LC_nobreak">'
                                .$correct.' / '.$total
                                .'</span></td>'
                              .&Apache::loncommon::end_data_table_row());                               .&Apache::loncommon::end_data_table_row());
  }   }
             }              }
Removed from v.1.44  
changed lines
  Added in v.1.47

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>