--- loncom/homework/chemresponse.pm	2008/12/11 14:52:30	1.83
+++ loncom/homework/chemresponse.pm	2008/12/22 14:55:28	1.84
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # chemical equation style response
 #
-# $Id: chemresponse.pm,v 1.83 2008/12/11 14:52:30 bisitz Exp $
+# $Id: chemresponse.pm,v 1.84 2008/12/22 14:55:28 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -338,6 +338,7 @@ sub end_organicresponse {
 					   "$partid.$id"); # part.response
 	if ($target eq 'analyze') {
             $Apache::lonhomework::analyze{"$partid.$id.type"} = 'organicresponse';
+            push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");
 	    &Apache::lonhomework::set_bubble_lines();
 	}
     }
@@ -580,6 +581,7 @@ sub end_reactionresponse {
 	&Apache::lonxml::increment_counter(&Apache::response::repetition(), "$partid.$id");
         if ($target eq 'analyze') {
             $Apache::lonhomework::analyze{"$partid.$id.type"} = 'reactionresponse';
+            push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");
             &Apache::lonhomework::set_bubble_lines();
         }
     }