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

Diff for /loncom/homework/grades.pm between versions 1.356 and 1.358

version 1.356, 2006/05/29 23:45:14 version 1.358, 2006/05/30 00:15:04
Line 2458  sub handback_files { Line 2458  sub handback_files {
                         ') while trying to upload '.$newflg.'_'.$part_resp.'_returndoc'.$file_counter.'</font><br />');                          ') while trying to upload '.$newflg.'_'.$part_resp.'_returndoc'.$file_counter.'</font><br />');
                     } else {                      } else {
                         my $subject = "File Handed Back by Instructor ";                          my $subject = "File Handed Back by Instructor ";
                         my $message = "A file has been returned that was originally submitted in reponse to: ";                          my $message = "A file has been returned that was originally submitted in reponse to: <br />";
                         $message .= &Apache::lonnet::gettitle($symb);                          $message .= "<strong>".&Apache::lonnet::gettitle($symb)."</strong><br />";
                         $message .= " The returned file is named ".$save_file_name;                          $message .= " The returned file is named: <br /><strong>".$save_file_name."</strong><br />";
                         $message .= " and can be found in your portfolio space.";                          $message .= " and can be found in your portfolio space.";
                         &Apache::lonnet::logthis($message);                          &Apache::lonnet::logthis($message);
                         my $msgstatus = &Apache::lonmsg::user_normal_msg($stuname,$domain,                          my $msgstatus = &Apache::lonmsg::user_normal_msg($stuname,$domain,
Line 5102  sub scantron_validate_sequence { Line 5102  sub scantron_validate_sequence {
  my @resources=   my @resources=
     $navmap->retrieveResources($map,\&scantron_filter_not_exam,1,0);      $navmap->retrieveResources($map,\&scantron_filter_not_exam,1,0);
  if (@resources) {   if (@resources) {
     $r->print("<p>".&mt('Some resource in the sequece currently are not set to exam mode. Grading these resources currently may not work correctly.')."</p>");      $r->print("<p>".&mt('Some resources in the sequence currently are not set to exam mode. Grading these resources currently may not work correctly.')."</p>");
     return (1,$currentphase);      return (1,$currentphase);
  }   }
     }      }
Removed from v.1.356  
changed lines
  Added in v.1.358

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