[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)));
}