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

Diff for /loncom/interface/lonquickgrades.pm between versions 1.58 and 1.61

version 1.58, 2010/12/04 14:41:09 version 1.61, 2011/01/03 14:39:19
Line 121  sub startGradeScreen { Line 121  sub startGradeScreen {
     my $allowed_to_edit =  &Apache::lonnet::allowed('mgr',$env{'request.course.id'});      my $allowed_to_edit =  &Apache::lonnet::allowed('mgr',$env{'request.course.id'});
   
     if ($allowed_to_view) {      if ($allowed_to_view) {
        $r->print('<div id="LC_head_subbox">');         my @notes;
        if ($notshowTotals)  { $r->print ('&nbsp;'.&mt('Students do not see total points.').'&nbsp;'); }         push(@notes,&mt('Students do not see total points.')) if ($notshowTotals);
        if ($notshowSPRSlink){ $r->print ('&nbsp;'.&mt('Students do not see link to spreadsheet.').'&nbsp;'); }         push(@notes,&mt('Students do not see link to spreadsheet.')) if ($notshowSPRSlink);
        if ($showPoints)     { $r->print ('&nbsp;'.&mt('Students will see points based on problem weights.').'&nbsp;'); }         push(@notes,&mt('Students will see points based on problem weights.')) if ($showPoints);
        if ($showCategories) { $r->print ('&nbsp;'.&mt('Students will see points based on categories.').'&nbsp;'); }         push(@notes,&mt('Students will see points based on categories.')) if ($showCategories);
        $r->print('&nbsp;'.&Apache::lonhtmlcommon::coursepreflink(&mt('Grade display settings'),'grading').'</div>');         push(@notes, &Apache::lonhtmlcommon::coursepreflink(&mt('Grade display settings'),'grading'));
          $r->print(&Apache::loncommon::head_subbox(join('&nbsp;&nbsp;',@notes)));
     }      }
   
   
Line 144  sub startGradeScreen { Line 145  sub startGradeScreen {
                                                                  &mt('Assessment Overview Chart').'</b></a></li>');                                                                   &mt('Assessment Overview Chart').'</b></a></li>');
   
     }      }
       if ($allowed_to_edit) {
          $r->print("\n".'<li'.($mode eq 'grading'?' class="active"':'').'><a href="/adm/grades"><b>&nbsp;&nbsp;&nbsp;&nbsp;'.
                                                                    &mt('Problem Grading').'&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>');
       }
     $r->print("\n".'</ul>'."\n");      $r->print("\n".'</ul>'."\n");
     $r->print('<div class="LC_Box" style="clear:both;margin:0;"><div id="maincoursedoc" style="margin:0 0;padding:0 0;"><div class="LC_ContentBox" id="mainCourseDocuments" style="display: block;">');      $r->print('<div class="LC_Box" style="clear:both;margin:0;"><div id="maincoursedoc" style="margin:0 0;padding:0 0;"><div class="LC_ContentBox" id="mainCourseDocuments" style="display: block;">');
 }  }
Removed from v.1.58  
changed lines
  Added in v.1.61

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