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

Diff for /loncom/homework/grades.pm between versions 1.544 and 1.547

version 1.544, 2008/12/31 18:09:57 version 1.547, 2009/01/16 02:31:49
Line 2317  sub get_last_submission { Line 2317  sub get_last_submission {
  $$returnhash{$version.':keys'}))) {   $$returnhash{$version.':keys'}))) {
  $lasthash{$key}=$$returnhash{$version.':'.$key};   $lasthash{$key}=$$returnhash{$version.':'.$key};
  $timestamp =    $timestamp = 
     scalar(localtime($$returnhash{$version.':timestamp'}));      &Apache::lonlocal::locallocaltime($$returnhash{$version.':timestamp'});
     }      }
  }   }
  foreach my $key (keys(%lasthash)) {   foreach my $key (keys(%lasthash)) {
Line 7584  sub grade_student_bubbles { Line 7584  sub grade_student_bubbles {
                     'grade_domain'  => $udom,                      'grade_domain'  => $udom,
                     'grade_courseid'=> $env{'request.course.id'},                      'grade_courseid'=> $env{'request.course.id'},
                     'grade_symb'    => $resource->symb(),                      'grade_symb'    => $resource->symb(),
                     'code'          => $scancode);                      'CODE'          => $scancode);
         my $result=&ssi_with_retries($resource->src(),$ssi_retries,%form);          my $result=&ssi_with_retries($resource->src(),$ssi_retries,%form);
         return 'ssi_error' if ($ssi_error);          return 'ssi_error' if ($ssi_error);
         last if (&Apache::loncommon::connection_aborted($r));          last if (&Apache::loncommon::connection_aborted($r));
Line 7778  sub checkscantron_results { Line 7778  sub checkscantron_results {
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Scantron/Submissions Comparison Status',      my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Scantron/Submissions Comparison Status',
                                     'Progress of Scantron Data/Submission Records Comparison',$count,                                      'Progress of Scantron Data/Submission Records Comparison',$count,
                                     'inline',undef,'checkscantron');                                      'inline',undef,'checkscantron');
     my ($username,$domain,$uname,$started);      my ($username,$domain,$started);
   
     &Apache::grades::scantron_get_maxbubble();  # Need the bubble lines array to parse.      &Apache::grades::scantron_get_maxbubble();  # Need the bubble lines array to parse.
   
Removed from v.1.544  
changed lines
  Added in v.1.547

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