--- loncom/homework/grades.pm	2007/11/05 11:46:08	1.480
+++ loncom/homework/grades.pm	2007/11/06 10:12:27	1.481
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.480 2007/11/05 11:46:08 foxr Exp $
+# $Id: grades.pm,v 1.481 2007/11/06 10:12:27 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -42,7 +42,6 @@ use Apache::Constants qw(:common);
 use Apache::lonlocal;
 use Apache::lonenc;
 use String::Similarity;
-use Data::Dumper;
 use LONCAPA;
 
 use POSIX qw(floor);
@@ -5174,7 +5173,7 @@ sub scantron_fixup_scanline {
 		    my @alphabet=('A'..'Z');
 		    $answer=$alphabet[$bubble_number];
 		} elsif ($on eq 'number') {
-		    $answer=$args->$bubble_number+1;
+		    $answer=$args->{$bubble_number+1};
 		    if ($answer == 10) { $answer = '0'; }
 		} else {
 		    substr($answer,$args->{'response'},1)=$on;