--- loncom/homework/optionresponse.pm 2007/06/26 20:51:53 1.144 +++ loncom/homework/optionresponse.pm 2007/08/29 10:07:42 1.145 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.144 2007/06/26 20:51:53 albertel Exp $ +# $Id: optionresponse.pm,v 1.145 2007/08/29 10:07:42 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -71,6 +71,8 @@ sub start_optionresponse { } elsif ($target eq 'analyze') { my $part_id="$Apache::inputtags::part.$id"; push (@{ $Apache::lonhomework::analyze{"parts"} },$part_id); + push (@{ $Apache::lonhomeowrk::analyze{"$part_id.bubble_lines"} }, 1); + } return $result; }