--- 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') {