--- loncom/homework/rankresponse.pm 2004/03/08 23:23:04 1.30 +++ loncom/homework/rankresponse.pm 2004/03/15 22:09:52 1.31 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # rank style response # -# $Id: rankresponse.pm,v 1.30 2004/03/08 23:23:04 albertel Exp $ +# $Id: rankresponse.pm,v 1.31 2004/03/15 22:09:52 albertel Exp $ # Copyright Michigan State University Board of Trustees # # This file is part of the LearningOnline Network with CAPA (LON-CAPA). @@ -415,6 +415,7 @@ sub end_foil { if (defined($Apache::response::foilnames{$name})) { &Apache::lonxml::error(&mt("Foil name [_1] appears more than once. Foil names need to be unique.",$name)); } + $Apache::response::foilnames{$name}++; my $location =&Apache::lonxml::get_param('location',$parstack, $safeeval); if ( $Apache::rankresponse::conceptgroup