--- loncom/interface/statistics/lonstudentassessment.pm 2002/08/13 00:37:18 1.8
+++ loncom/interface/statistics/lonstudentassessment.pm 2002/08/31 18:31:15 1.9
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# (Publication Handler
#
-# $Id: lonstudentassessment.pm,v 1.8 2002/08/13 00:37:18 stredwic Exp $
+# $Id: lonstudentassessment.pm,v 1.9 2002/08/31 18:31:15 stredwic Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -290,7 +290,8 @@ sub StudentReport {
my $Str = '';
if(defined($cache->{$name.':error'})) {
- return $Str;
+ return '
';
+# return 'ERROR in student report for '.$name.'
';
}
if($cache->{$name.':error'} =~ /course/) {
$Str .= 'No course data for student ';
@@ -308,7 +309,7 @@ sub StudentReport {
foreach(split(/\:/,$cache->{$sequence.':'.$problemID.
':parts'})) {
$characterCount++;
- if(defined($cache->{$name.':'.$problemID.':NoVersion'}) ||
+ if($cache->{$name.':'.$problemID.':NoVersion'} eq 'true' ||
$cache->{$name.':'.$problemID.':'.$_.':code'} eq ' ') {
$Str .= ' ';
next;