loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.458, 2007/10/12 22:36:56	version 1.459, 2007/10/15 09:47:47
Line 5351 sub scantron_parse_scanline {	Line 5351 sub scantron_parse_scanline {
}	}
} elsif (scalar(@array) lt 2) {	} elsif (scalar(@array) lt 2) {

my $location = [length($array[0])];	my $location = length($array[0]);
my $line_num = $location / $$scantron_config{'Qlength'};	my $line_num = $location / $$scantron_config{'Qlength'};
my $bubble = $alphabet[$location % $$scantron_config{'Qlength'}];	my $bubble = $alphabet[$location % $$scantron_config{'Qlength'}];