--- loncom/homework/radiobuttonresponse.pm	2001/01/12 21:58:33	1.7
+++ loncom/homework/radiobuttonresponse.pm	2001/01/19 20:05:40	1.9
@@ -1,8 +1,6 @@
 # The LearningOnline Network with CAPA
 # mutliple choice style responses
 
-# 11/23,11/24,11/28 Gerd Kortemeyer
-
 package Apache::radiobuttonresponse;
 use strict;
 
@@ -39,7 +37,6 @@ sub setrandomnumber {
   return '';
 }
 
-#FIXME needs to stablely do random picks
 sub end_foilgroup {
   my ($target,$token,$parstack,$parser,$safeeval,$style)=@_;
   
@@ -56,7 +53,7 @@ sub end_foilgroup {
     if ($target eq 'web') {
       $result=&displayfoils($max,$answer);
     } elsif ( $target eq 'grade') {
-      if ( defined $ENV{'form.submit'}) {
+      if ( defined $ENV{'form.submitted'}) {
 	my $response = $ENV{'form.HWVAL'.$Apache::inputtags::response['-1']};
 	if ( $response =~ /[^\s]/) {
 	  my $id = $Apache::inputtags::response['-1'];