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

Diff for /loncom/homework/grades.pm between versions 1.777 and 1.778

version 1.777, 2020/11/08 22:23:52 version 1.778, 2020/11/09 00:44:30
Line 11457  sub handler { Line 11457  sub handler {
             } else {              } else {
                 $divforres = 1;                  $divforres = 1;
             }              }
             my $csslinks = &css_links($symb);              my $head_extra = $js;
             my $head_extra = $js."\n".$csslinks;              unless ($env{'form.vProb'} eq 'no') {
                   my $csslinks = &css_links($symb);
                   if ($csslinks) {
                       $head_extra .= "\n$csslinks";
                   }
               }
             &startpage($request,$symb,[{href=>"", text=>"Student Submissions"}],undef,undef,              &startpage($request,$symb,[{href=>"", text=>"Student Submissions"}],undef,undef,
                        $stuvcurrent,$stuvdisp,undef,$head_extra,$onload,$divforres);                         $stuvcurrent,$stuvdisp,undef,$head_extra,$onload,$divforres);
             if ($versionform) {              if ($versionform) {
Line 11473  sub handler { Line 11478  sub handler {
                 &choose_task_version_form($symb,$env{'form.student'},                  &choose_task_version_form($symb,$env{'form.student'},
                                           $env{'form.userdom'},                                            $env{'form.userdom'},
                                           $env{'form.inhibitmenu'});                                            $env{'form.inhibitmenu'});
             my $csslinks = &css_links($symb);              my $head_extra = $js;
             my $head_extra = $js."\n".$csslinks;              unless ($env{'form.vProb'} eq 'no') {
                   my $csslinks = &css_links($symb);
                   if ($csslinks) {
                       $head_extra .= "\n$csslinks";
                   }
               }
             &startpage($request,$symb,[{href=>"", text=>"Previous Student Version"}],undef,undef,              &startpage($request,$symb,[{href=>"", text=>"Previous Student Version"}],undef,undef,
                        $stuvcurrent,$stuvdisp,$env{'form.inhibitmenu'},$head_extra);                         $stuvcurrent,$stuvdisp,$env{'form.inhibitmenu'},$head_extra);
             if ($versionform) {              if ($versionform) {
Line 11487  sub handler { Line 11497  sub handler {
                                        {href=>'',text=>'Select student'}],1,1);                                         {href=>'',text=>'Select student'}],1,1);
     &pickStudentPage($request,$symb);      &pickStudentPage($request,$symb);
  } elsif ($command eq 'displayPage' && $perm{'vgr'}) {   } elsif ($command eq 'displayPage' && $perm{'vgr'}) {
             my $csslinks = &css_links($symb,'map');              my $csslinks;
               unless ($env{'form.vProb'} eq 'no') {
                   $csslinks = &css_links($symb,'map');
               }
             &startpage($request,$symb,              &startpage($request,$symb,
                                       [{href=>&href_symb_cmd($symb,'all_for_one'),text=>'Grade page/folder for one student'},                                        [{href=>&href_symb_cmd($symb,'all_for_one'),text=>'Grade page/folder for one student'},
                                        {href=>'',text=>'Select student'},                                         {href=>'',text=>'Select student'},
Line 11500  sub handler { Line 11513  sub handler {
                                        {href=>'',text=>'Store grades'}],1,1);                                         {href=>'',text=>'Store grades'}],1,1);
     &updateGradeByPage($request,$symb);      &updateGradeByPage($request,$symb);
  } elsif ($command eq 'processGroup' && $perm{'vgr'}) {   } elsif ($command eq 'processGroup' && $perm{'vgr'}) {
             my $csslinks = &css_links($symb);              my $csslinks;
               unless ($env{'form.vProb'} eq 'no') {
                   $csslinks = &css_links($symb);
               }
             &startpage($request,$symb,[{href=>'',text=>'...'},              &startpage($request,$symb,[{href=>'',text=>'...'},
                                        {href=>'',text=>'Modify grades'}],undef,undef,undef,undef,undef,$csslinks,undef,1);                                         {href=>'',text=>'Modify grades'}],undef,undef,undef,undef,undef,$csslinks,undef,1);
     &processGroup($request,$symb);      &processGroup($request,$symb);
Removed from v.1.777  
changed lines
  Added in v.1.778

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