[LON-CAPA-cvs] cvs: loncom /interface/statistics lonstudentassessment.pm
minaeibi
lon-capa-cvs@mail.lon-capa.org
Tue, 22 Oct 2002 16:27:40 -0000
minaeibi Tue Oct 22 12:27:40 2002 EDT
Modified files:
/loncom/interface/statistics lonstudentassessment.pm
Log:
Fixed Bug #752 to add total points to each homework set total
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.14 loncom/interface/statistics/lonstudentassessment.pm:1.15
--- loncom/interface/statistics/lonstudentassessment.pm:1.14 Sun Oct 20 20:15:13 2002
+++ loncom/interface/statistics/lonstudentassessment.pm Tue Oct 22 12:27:39 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# (Publication Handler
#
-# $Id: lonstudentassessment.pm,v 1.14 2002/10/21 00:15:13 minaeibi Exp $
+# $Id: lonstudentassessment.pm,v 1.15 2002/10/22 16:27:39 minaeibi Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -340,17 +340,17 @@
$spacesNeeded -= 3;
$Str .= (' 'x$spacesNeeded);
- my $outputProblemsCorrect = sprintf("%3d", $cache->{$name.':'.$sequence.
- ':problemsCorrect'});
+# my $outputProblemsCorrect = sprintf("%3d", $cache->{$name.':'.$sequence.
+# ':problemsCorrect'});
-# my $outputProblemsCorrect = sprintf("%2d/%2d ", $cache->{$name.':'.$sequence.
-# ':problemsCorrect'},
-# $characterCount);
+ my $outputProblemsCorrect = sprintf("%2d/%2d", $cache->{$name.':'.$sequence.
+ ':problemsCorrect'},
+ $characterCount);
if($hasData eq 'true') {
$Str .= '<font color="#007700">'.$outputProblemsCorrect.'</font>';
$hasFinalData = 'true';
} else {
- $Str .= '<font color="#007700"> </font>';
+ $Str .= '<font color="#007700"> </font>';
}
$Str .= $spacing;
}