--- loncom/homework/grades.pm 2006/03/11 00:02:18 1.331
+++ loncom/homework/grades.pm 2006/03/11 00:08:48 1.332
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.331 2006/03/11 00:02:18 albertel Exp $
+# $Id: grades.pm,v 1.332 2006/03/11 00:08:48 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -5084,8 +5084,10 @@ ENDSCRIPT
"&scantron_CODElist=".&Apache::lonnet::escape($env{'form.scantron_CODElist'}).
"&curCODE=".&Apache::lonnet::escape($$scan_record{'scantron.CODE'}).
"&scantron_selectfile=".&Apache::lonnet::escape($env{'form.scantron_selectfile'});
- $r->print(" Selected CODE is ");
- $r->print("\n
");
+ if ($env{'form.scantron_CODElist'} =~ /\S/) {
+ $r->print(" Selected CODE is ");
+ $r->print("\n
");
+ }
$r->print(" as the CODE.");
$r->print("\n
");
} elsif ($error eq 'doublebubble') {