Diff for /loncom/interface/statistics/lonstudentassessment.pm between versions 1.10 and 1.12

version 1.10, 2002/08/31 19:25:39 version 1.12, 2002/09/22 18:24:45
Line 50  sub BuildStudentAssessmentPage { Line 50  sub BuildStudentAssessmentPage {
 #    $jr = $r;  #    $jr = $r;
     my %cache;      my %cache;
     unless(tie(%cache,'GDBM_File',$cacheDB,&GDBM_READER(),0640)) {      unless(tie(%cache,'GDBM_File',$cacheDB,&GDBM_READER(),0640)) {
 [5~        $r->print('<html><body>Unable to tie database.</body></html>');          $r->print('<html><body>Unable to tie database.</body></html>');
         return;          return;
     }      }
   
Line 383  problems. Line 383  problems.
   
 sub CreateLegend {  sub CreateLegend {
     my $Str = "<p><pre>".      my $Str = "<p><pre>".
               "1..9: correct by student in 1..9 tries\n".                "1..9  correct by student in 1..9 tries\n".
               "   *: correct by student in more than 9 tries\n".                "   *  correct by student in more than 9 tries\n".
       "   +: correct by override\n".        "   +  correct by override\n".
               "   -: incorrect by override\n".                "   -  incorrect by override\n".
       "   .: incorrect attempted\n".        "   .  incorrect attempted\n".
       "   #: ungraded attempted\n".        "   #  ungraded attempted\n".
               "    : not attempted\n".                "      not attempted\n".
       "   x: excused".        "   x  excused".
               "</pre><p>";                 "</pre><p>"; 
     return $Str;      return $Str;
 }  }

Removed from v.1.10  
changed lines
  Added in v.1.12


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