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

Diff for /loncom/homework/grades.pm between versions 1.798 and 1.800

version 1.798, 2024/12/09 02:46:01 version 1.800, 2024/12/09 22:01:01
Line 1458  sub do_passback { Line 1458  sub do_passback {
                                             'format'   => $scoretype,                                              'format'   => $scoretype,
                                             'scope'    => $scope,                                              'scope'    => $scope,
                                             'clientip' => $pb{'clientip'},                                              'clientip' => $pb{'clientip'},
                                             'linkprot' => $linkprotector,                                              'linkprot' => $linkprotector.':'.$linkuri,
                                             'total'    => $total,                                              'total'    => $total,
                                             'possible' => $possible,                                              'possible' => $possible,
                                             'score'    => $score,                                              'score'    => $score,
Line 1836  sub process_passbacks { Line 1836  sub process_passbacks {
                                         'format'     => $pb{'scoretype'},                                          'format'     => $pb{'scoretype'},
                                         'scope'      => $pb{'scope'},                                          'scope'      => $pb{'scope'},
                                         'clientip'   => $pb{'clientip'},                                          'clientip'   => $pb{'clientip'},
                                         'linkprot'   => $pb{'linkprotector'},                                          'linkprot'   => $pb{'linkprotector'}.':'.$pb{'linkuri'},
                                         'total_s'    => \%total_by_symb,                                          'total_s'    => \%total_by_symb,
                                         'possible_s' => \%possible_by_symb,                                          'possible_s' => \%possible_by_symb,
                         };                          };
Line 1908  sub process_passbacks { Line 1908  sub process_passbacks {
                            'format'   => $pb{'scoretype'},                             'format'   => $pb{'scoretype'},
                            'scope'    => $pb{'scope'},                             'scope'    => $pb{'scope'},
                            'clientip' => $pb{'clientip'},                             'clientip' => $pb{'clientip'},
                            'linkprot' => $pb{'linkprotector'},                             'linkprot' => $pb{'linkprotector'}.':'.$pb{'linkuri'},
                            'total'    => $total,                             'total'    => $total,
                            'possible' => $possible,                             'possible' => $possible,
                            'score'    => $score,                             'score'    => $score,
Line 4249  sub processHandGrade { Line 4249  sub processHandGrade {
  } else {   } else {
                             $pbcollab{$collaborator}{$part} = [$pts,$wgt];                              $pbcollab{$collaborator}{$part} = [$pts,$wgt];
                             if ($message ne '') {                              if ($message ne '') {
     my ($baseurl,$showsymb) =           my ($baseurl,$showsymb) = 
  &get_feedurl_and_symb($symb,$collaborator,      &get_feedurl_and_symb($symb,$collaborator,
       $udom);              $udom);
     if ($env{'form.withgrades'.$ctr}) {          if ($env{'form.withgrades'.$ctr}) {
  $messagetail = " for <a href=\"".      $messagetail = " for <a href=\"".
                                     $baseurl."?symb=$showsymb\">$restitle</a>";                                          $baseurl."?symb=$showsymb\">$restitle</a>";
           }
           $msgstatus =
       &Apache::lonmsg::user_normal_msg($collaborator,$udom,$subject,$message.$messagetail,undef,$baseurl,undef,undef,undef,$showsymb,$restitle);
     }      }
     $msgstatus =           }
  &Apache::lonmsg::user_normal_msg($collaborator,$udom,$subject,$message.$messagetail,undef,$baseurl,undef,undef,undef,$showsymb,$restitle);  
  }  
     }      }
  }   }
     }      }
Removed from v.1.798  
changed lines
  Added in v.1.800

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