[LON-CAPA-cvs] cvs: modules /albertel course_info.pl
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 17 Jan 2006 21:10:57 -0000
albertel Tue Jan 17 16:10:57 2006 EDT
Modified files:
/modules/albertel course_info.pl
Log:
- actually log the total number of tries
Index: modules/albertel/course_info.pl
diff -u modules/albertel/course_info.pl:1.4 modules/albertel/course_info.pl:1.5
--- modules/albertel/course_info.pl:1.4 Tue Jan 17 16:07:38 2006
+++ modules/albertel/course_info.pl Tue Jan 17 16:10:55 2006
@@ -103,7 +103,7 @@
$other++;
push(@others,$src);
}
- if ($src =~ /\.problem/) {
+ if ($src =~ /\.(problem|exam|survey)/) {
my ($id) = ($item=~/src_(.*)/);
my ($map_id,$res_id) = split(/\./,$id);
my $symb = &Apache::lonnet::encode_symb($hash->{'map_id_'.$map_id},
@@ -116,7 +116,6 @@
my @attempt_keys = grep(/^resource\.[^\.]+\.tries/,
(keys(%grades)));
foreach my $key (@attempt_keys) {
- &log("$key");
$tries+=$grades{$key};
}
}
@@ -126,6 +125,7 @@
}
}
&log("Course has $items items.");
+ &log("Total number of tries on problems $total_tries .");
&increaselog();
foreach my $item (keys(%classes)) {
if ($types{$item}) {