loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.635, 2013/07/24 18:21:39	version 1.636, 2013/08/23 17:00:38
Line 4449 ALL_PROBLEMS	Line 4449 ALL_PROBLEMS
my @lines = &Apache::grades::get_scantronformat_file();	my @lines = &Apache::grades::get_scantronformat_file();
my $codechoice='';	my $codechoice='';
foreach my $line (@lines) {	foreach my $line (@lines) {
	next if (($line =~ /^\#/) \|\| ($line eq ''));
my ($name,$description,$code_type,$code_length)=	my ($name,$description,$code_type,$code_length)=
(split(/:/,$line))[0,1,2,4];	(split(/:/,$line))[0,1,2,4];
if ($code_length > 0 &&	if ($code_length > 0 &&