--- loncom/interface/statistics/lonstudentassessment.pm 2002/10/21 00:15:13 1.14 +++ loncom/interface/statistics/lonstudentassessment.pm 2002/10/22 16:27:39 1.15 @@ -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 @@ 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); + my $outputProblemsCorrect = sprintf("%2d/%2d", $cache->{$name.':'.$sequence. + ':problemsCorrect'}, + $characterCount); if($hasData eq 'true') { $Str .= ''.$outputProblemsCorrect.''; $hasFinalData = 'true'; } else { - $Str .= ' '; + $Str .= ' '; } $Str .= $spacing; }