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

Diff for /loncom/interface/statistics/lonstudentassessment.pm between versions 1.4 and 1.5

version 1.4, 2002/07/26 19:49:26 version 1.5, 2002/07/31 14:35:38
Line 106  sub BuildStudentAssessmentPage { Line 106  sub BuildStudentAssessmentPage {
                  $selectedName ne 'All Students');                   $selectedName ne 'All Students');
         $selected = 1;          $selected = 1;
         my $courseData;           my $courseData; 
         if(tie(%cache,'GDBM_File',$cacheDB,&GDBM_READER,0640)) {          my $downloadTime='';
             if($cache{$_.':lastDownloadTime'} eq 'Not downloaded') {          if(tie(%cache,'GDBM_File',$cacheDB,&GDBM_READER(),0640)) {
                 untie(%cache);              $downloadTime = $cache{$_.':lastDownloadTime'};
                 $courseData =               untie(%cache);
                     &Apache::loncoursedata::DownloadCourseInformation($_,           }
                                                                     $courseID);          if($downloadTime eq 'Not downloaded') {
                 if(tie(%cache,'GDBM_File',$cacheDB,&GDBM_WRCREAT,0640)) {              $courseData = 
                     &Apache::loncoursedata::ProcessStudentData(\%cache,                   &Apache::loncoursedata::DownloadCourseInformation($_, 
                                                              $courseData, $_);                                                                    $courseID);
                     untie(%cache);              unless(tie(%cache,'GDBM_File',$cacheDB,&GDBM_WRCREAT(),0640)) {
                 } else {                  last if($c->aborted());
                     last if($c->aborted());                  next;
                     next;  
                 }  
             } else {  
                 untie(%cache);  
             }              }
         } else {              &Apache::loncoursedata::ProcessStudentData(\%cache, 
             last if($c->aborted());                                                         $courseData, $_);
             next;              untie(%cache);
         }          }
   
         last if ($c->aborted());          last if ($c->aborted());
Removed from v.1.4  
changed lines
  Added in v.1.5

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