Diff for /loncom/interface/statistics/lonproblemstatistics.pm between versions 1.9 and 1.10

version 1.9, 2002/08/01 20:49:06 version 1.10, 2002/08/02 12:41:20
Line 450  sub BuildStatisticsTable { Line 450  sub BuildStatisticsTable {
     $urlres=$Map;      $urlres=$Map;
 #######################  #######################
   
 #    $res = '<a href="'.$cache->{'src_'.$ResId}.'">'.$res.'</a>';  #    $res = '<a href="'.$cache->{$ResId.':source'}.'">'.$res.'</a>';
     #$Map = '<a href="'.$Map.'">'.$res.'</a>';      #$Map = '<a href="'.$Map.'">'.$res.'</a>';
   
 #------------------------ Compute the Average of Tries about one problem  #------------------------ Compute the Average of Tries about one problem
Line 599  sub TableRow { Line 599  sub TableRow {
         my ($ResId,$Dummy)=split(/\*/,$Prob);          my ($ResId,$Dummy)=split(/\*/,$Prob);
         $Ptr="\n".'<br>'.          $Ptr="\n".'<br>'.
              "\n".'"'.($RealIdx+1).'",'.               "\n".'"'.($RealIdx+1).'",'.
              "\n".'"'.$cache->{'title_'.$ResId}.$Dummy.'",'.               "\n".'"'.$cache->{$ResId.':title'}.$Dummy.'",'.
              "\n".'"'.$cache->{'src_'.$ResId}.'",'.               "\n".'"'.$cache->{$ResId.':source'}.'",'.
              "\n".'"'.$StdNo.'",'.               "\n".'"'.$StdNo.'",'.
              "\n".'"'.$TotalTries.'",'.               "\n".'"'.$TotalTries.'",'.
              "\n".'"'.$MxTries.'",'.               "\n".'"'.$MxTries.'",'.

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


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