Diff for /loncom/interface/lonquickgrades.pm between versions 1.28 and 1.29

version 1.28, 2003/09/25 19:22:14 version 1.29, 2003/11/21 18:18:04
Line 67  sub real_handler { Line 67  sub real_handler {
   
     my $showPoints =       my $showPoints = 
         $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'standard';          $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'standard';
       my $notshowSPRSlink = 
           $ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'external';
   
     # Create the nav map      # Create the nav map
     my $navmap = Apache::lonnavmaps::navmap->new();      my $navmap = Apache::lonnavmaps::navmap->new();
Line 85  sub real_handler { Line 87  sub real_handler {
     my $title = $showPoints ? "Quick Points Display" : "Quick Completed Problems Display";      my $title = $showPoints ? "Quick Points Display" : "Quick Completed Problems Display";
     $r->print(&Apache::loncommon::bodytag($title, '', ''));      $r->print(&Apache::loncommon::bodytag($title, '', ''));
   
     if (!$showPoints) {      if (!$showPoints && !$notshowSPRSlink ) {
         $r->print(<<HEADER);           $r->print(<<HEADER); 
 <p>This screen shows how many problems (or problem parts) you have completed, and  <p>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 href="/adm/studentcalc">a detailed  how many you have not yet done. You can also look at <a href="/adm/studentcalc">a detailed

Removed from v.1.28  
changed lines
  Added in v.1.29


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