--- loncom/homework/optionresponse.pm 2007/10/15 09:47:29 1.147 +++ loncom/homework/optionresponse.pm 2008/01/31 05:14:06 1.148 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.147 2007/10/15 09:47:29 foxr Exp $ +# $Id: optionresponse.pm,v 1.148 2008/01/31 05:14:06 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -71,7 +71,7 @@ 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); + push (@{ $Apache::lonhomework::analyze{"$part_id.bubble_lines"} }, 1); } return $result;