--- loncom/homework/grades.pm	2008/12/31 20:41:35	1.545
+++ loncom/homework/grades.pm	2009/01/06 21:57:06	1.546
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.545 2008/12/31 20:41:35 raeburn Exp $
+# $Id: grades.pm,v 1.546 2009/01/06 21:57:06 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -7778,7 +7778,7 @@ sub checkscantron_results {
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Scantron/Submissions Comparison Status',
                                     'Progress of Scantron Data/Submission Records Comparison',$count,
                                     'inline',undef,'checkscantron');
-    my ($username,$domain,$uname,$started);
+    my ($username,$domain,$started);
 
     &Apache::grades::scantron_get_maxbubble();  # Need the bubble lines array to parse.