--- loncom/xml/lonxml.pm 2003/10/01 21:13:50 1.282 +++ loncom/xml/lonxml.pm 2003/10/02 05:45:38 1.283 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.282 2003/10/01 21:13:50 albertel Exp $ +# $Id: lonxml.pm,v 1.283 2003/10/02 05:45:38 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -867,17 +867,13 @@ sub store_counter { sub get_all_text { my($tag,$pars,$style)= @_; - &Apache::lonxml::debug("Got a ".ref($pars)); my $gotfullstack=1; if (ref($pars) ne 'ARRAY') { $gotfullstack=0; $pars=[$pars]; } - &Apache::lonxml::debug("Got a ".ref($style)); if (ref($style) ne 'HASH') { $style={}; - } else { - &Apache::lonhomework::showhash(%$style); } my $depth=0; my $token; @@ -901,7 +897,7 @@ sub get_all_text { } elsif ($token->[0] eq 'E') { if ( $token->[1] =~ /^$tag$/i) { $depth--; } #skip sending back the last end tag - if ($depth == 0 && exists($$style{'/'.$token->[1]})) { + if ($depth == 0 && exists($$style{'/'.$token->[1]}) && $Apache::lonxml::usestyle) { my $string= ''. $$style{'/'.$token->[1]}.