[LON-CAPA-cvs] cvs: loncom /interface/statistics lonproblemanalysis.pm

matthew lon-capa-cvs@mail.lon-capa.org
Fri, 29 Oct 2004 16:13:45 -0000


matthew		Fri Oct 29 12:13:45 2004 EDT

  Modified files:              
    /loncom/interface/statistics	lonproblemanalysis.pm 
  Log:
  Removed some debugging code.
  
  
Index: loncom/interface/statistics/lonproblemanalysis.pm
diff -u loncom/interface/statistics/lonproblemanalysis.pm:1.99 loncom/interface/statistics/lonproblemanalysis.pm:1.100
--- loncom/interface/statistics/lonproblemanalysis.pm:1.99	Fri Oct 29 12:10:30 2004
+++ loncom/interface/statistics/lonproblemanalysis.pm	Fri Oct 29 12:13:45 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonproblemanalysis.pm,v 1.99 2004/10/29 16:10:30 matthew Exp $
+# $Id: lonproblemanalysis.pm,v 1.100 2004/10/29 16:13:45 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -658,7 +658,6 @@
         $incorrect[$i] = $incorrect_selections{$foil};
     }
     for (my $i=0;$i<=$#correct;$i++) { 
-        &Apache::lonnet::logthis('correct['.$i.']='.$correct[$i]);
         $correct[$i] = sprintf('%2f',$correct[$i]/$total*100);
     }
     for (my $i=0;$i<=$#incorrect;$i++) {
@@ -1234,7 +1233,6 @@
     if ($end_index == scalar(@$performance_data)-1) {
         $end_index++;
     }
-    &Apache::lonnet::logthis('  '.$begin_index.':'.$end_index);
     my $count;
     for (my $i=$begin_index;$i<$end_index;$i++) {
         my $attempt = $performance_data->[$i];
@@ -1254,7 +1252,6 @@
             }
         }
     }
-    &Apache::lonnet::logthis('count = '.$count);
     return (\%processed_time_data,$correct,$data_count,
             scalar(keys(%distinct_students)));
 }