--- loncom/homework/radiobuttonresponse.pm	2007/04/17 23:25:09	1.114
+++ loncom/homework/radiobuttonresponse.pm	2007/05/17 10:01:44	1.115
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # mutliple choice style responses
 #
-# $Id: radiobuttonresponse.pm,v 1.114 2007/04/17 23:25:09 albertel Exp $
+# $Id: radiobuttonresponse.pm,v 1.115 2007/05/17 10:01:44 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -31,6 +31,7 @@ use strict;
 use HTML::Entities();
 use Apache::lonlocal;
 use Apache::lonnet;
+use Apache::response;
 
 BEGIN {
     &Apache::lonxml::register('Apache::radiobuttonresponse',('radiobuttonresponse'));
@@ -39,6 +40,14 @@ BEGIN {
 sub start_radiobuttonresponse {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
     my $result;
+    #----- test/debugging to figure out some crap
+
+    my $partid = $Apache::inputtags::part;
+    &Apache::lonnet::logthis("Part id = $partid");
+    my $bubble_max = &Apache::response::get_response_param($partid, 'numbubbles', 10);
+    &Apache::lonnet::logthis("numbubbles [10] = $bubble_max");
+
+    #----- End test/debugging
     #when in a radiobutton response use these
     &Apache::lonxml::register('Apache::radiobuttonresponse',('foilgroup','foil','conceptgroup'));
     push (@Apache::lonxml::namespace,'radiobuttonresponse');