--- loncom/interface/statistics/lonstudentassessment.pm 2002/09/22 18:33:01 1.13
+++ loncom/interface/statistics/lonstudentassessment.pm 2002/10/22 16:27:39 1.15
@@ -1,12 +1,11 @@
# The LearningOnline Network with CAPA
# (Publication Handler
#
-# $Id: lonstudentassessment.pm,v 1.13 2002/09/22 18:33:01 minaeibi Exp $
+# $Id: lonstudentassessment.pm,v 1.15 2002/10/22 16:27:39 minaeibi Exp $
#
# Copyright Michigan State University Board of Trustees
#
# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
-#
# LON-CAPA is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
@@ -341,13 +340,17 @@ sub StudentReport {
$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);
if($hasData eq 'true') {
$Str .= ''.$outputProblemsCorrect.'';
$hasFinalData = 'true';
} else {
- $Str .= ' ';
+ $Str .= ' ';
}
$Str .= $spacing;
}