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