--- loncom/homework/imageresponse.pm	2002/07/23 14:41:06	1.19
+++ loncom/homework/imageresponse.pm	2002/07/29 20:43:47	1.20
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # image click response style
 #
-# $Id: imageresponse.pm,v 1.19 2002/07/23 14:41:06 sakharuk Exp $
+# $Id: imageresponse.pm,v 1.20 2002/07/29 20:43:47 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -55,9 +55,9 @@ sub end_imageresponse {
   return '';
 }
 
-%Apache::response::foilgroup={};
+%Apache::response::foilgroup=();
 sub start_foilgroup {
-  %Apache::response::foilgroup={};
+  %Apache::response::foilgroup=();
   $Apache::imageresponse::conceptgroup=0;
   &Apache::response::setrandomnumber();
   return '';
@@ -114,7 +114,6 @@ sub displayfoils {
 
 sub gradefoils {
   my (@whichopt) = @_;
-  my $result='';
   my $x;
   my $y;
   my $result;
@@ -174,7 +173,7 @@ sub end_foilgroup {
 
 sub start_conceptgroup {
   $Apache::imageresponse::conceptgroup=1;
-  %Apache::response::conceptgroup={};
+  %Apache::response::conceptgroup=();
   return '';
 }