--- loncom/homework/matchresponse.pm 2007/04/17 23:25:09 1.64 +++ loncom/homework/matchresponse.pm 2007/10/08 09:22:50 1.66 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Full matching style response # -# $Id: matchresponse.pm,v 1.64 2007/04/17 23:25:09 albertel Exp $ +# $Id: matchresponse.pm,v 1.66 2007/10/08 09:22:50 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -71,6 +71,8 @@ sub start_matchresponse { } elsif ($target eq 'analyze') { my $part_id="$Apache::inputtags::part.$id"; push (@{ $Apache::lonhomework::analyze{"parts"} },$part_id); + push (@{ $Apache::lonhomework::anaylze{"$part_id.bubble_lines"} }, + 1); } return $result; } @@ -276,7 +278,12 @@ sub end_foilgroup { ['text','value','location']); #FIXME need to store options in some way } - &Apache::lonxml::increment_counter(&getfoilcounts($max)); + &Apache::lonxml::increment_counter(&getfoilcounts($max), + $Apache::inputtags::part); + if ($target eq 'analyze') { + &Apache::lonhomework::set_bubble_lines(); + } + } elsif ($target eq 'edit') { $result=&Apache::edit::end_table(); }