--- loncom/interface/lonprintout.pm 2013/08/08 15:40:59 1.627.2.7 +++ loncom/interface/lonprintout.pm 2013/08/28 14:31:54 1.627.2.8 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.627.2.7 2013/08/08 15:40:59 raeburn Exp $ +# $Id: lonprintout.pm,v 1.627.2.8 2013/08/28 14:31:54 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1231,6 +1231,7 @@ sub is_code_valid { my ($code_type, $code_length) = ('letter', 6); # defaults. my @lines = &Apache::grades::get_scantronformat_file(); foreach my $line (@lines) { + next if (($line =~ /^\#/) || ($line eq '')); my ($name, $type, $length) = (split(/:/, $line))[0,2,4]; if($name eq $code_option) { $code_length = $length;