--- loncom/homework/rankresponse.pm	2004/10/21 06:35:57	1.40
+++ loncom/homework/rankresponse.pm	2004/11/08 22:56:05	1.41
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # rank style response
 #
-# $Id: rankresponse.pm,v 1.40 2004/10/21 06:35:57 albertel Exp $
+# $Id: rankresponse.pm,v 1.41 2004/11/08 22:56:05 albertel Exp $
 # Copyright Michigan State University Board of Trustees
 #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
@@ -113,6 +113,9 @@ sub end_foilgroup {
 	    my @shown = &whichfoils($max,$randomize);
 	    &Apache::response::analyze_store_foilgroup(\@shown,
 						  ['text','value','location']);
+	    my $part_id=
+		"$Apache::inputtags::part.$Apache::inputtags::response[-1]";
+	    $Apache::lonhomework::analyze{"$part_id.tol"}=$tol;
 	}
 	&Apache::lonxml::increment_counter(&getfoilcounts($max));
     } elsif ($target eq 'edit') {