--- loncom/interface/statistics/lonstudentassessment.pm 2003/09/30 11:41:06 1.68 +++ loncom/interface/statistics/lonstudentassessment.pm 2003/10/07 14:38:30 1.70 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.68 2003/09/30 11:41:06 matthew Exp $ +# $Id: lonstudentassessment.pm,v 1.70 2003/10/07 14:38:30 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -200,6 +200,9 @@ sub BuildStudentAssessmentPage { # are immediately reflected in the chart. &Apache::lonnet::clear_EXT_cache_status(); # + # Clean out loncoursedata's package data, just to be safe. + &Apache::loncoursedata::clear_internal_caches(); + # # Call the initialize routine selected above $initialize->($r); foreach my $student (@Students) { @@ -1519,6 +1522,9 @@ sub StudentPerformanceOnSequence { $partscore = $weight*$awarded; $score += $partscore; $symbol = $partscore; + if (abs($symbol - sprintf("%.0f",$symbol)) < 0.001) { + $symbol = sprintf("%.0f",$symbol); + } if (length($symbol) > 1) { $symbol = '*'; }