--- loncom/xml/lonxml.pm 2000/10/30 20:34:25 1.30 +++ loncom/xml/lonxml.pm 2000/11/06 14:32:35 1.32 @@ -30,11 +30,15 @@ use Apache::scripttag; $Apache::lonxml::outputstack = ''; $Apache::lonxml::redirection = 1; $Apache::lonxml::textredirection = 1; +$Apache::lonxml::on_offimport = 0; sub xmlparse { my ($target,$content_file_string,$safeinit,%style_for_target) = @_; - if ($target eq 'meta') {$Apache::lonxml::textredirection = 0;} + if ($target eq 'meta') + {$Apache::lonxml::textredirection = 0; + $Apache::lonxml::on_offimport = 1; + } my @pars = (); @Apache::lonxml::pwd=(); my $pwd=$ENV{'request.filename'}; @@ -68,7 +72,7 @@ sub xmlparse { if ($Apache::lonxml::textredirection == 1) {$result=$token->[1];} # $finaloutput .= &Apache::run::evaluate($token->[1],$safeeval,''); } elsif ($token->[0] eq 'S') { - if ($target eq 'meta' and $token->[2]->{metaout} eq 'ON') {$Apache::lonxml::textredirection = 1;} +# if ($target eq 'meta' and $token->[2]->{metaout} eq 'ON') {$Apache::lonxml::textredirection = 1;} # add tag to stack push (@stack,$token->[1]); # add parameters list to another stack @@ -91,7 +95,7 @@ sub xmlparse { \@pars, $safeeval, \%style_for_target); } } elsif ($token->[0] eq 'E') { - if ($target eq 'meta') {$Apache::lonxml::textredirection = 0;} +# if ($target eq 'meta') {$Apache::lonxml::textredirection = 0;} #clear out any tags that didn't end while ($token->[1] ne $stack[$#stack] && ($#stack > -1)) {pop @stack;pop @parstack;&decreasedepth($token);} @@ -299,7 +303,7 @@ sub parstring { sub handler { my $request=shift; - my $target='meta'; + my $target='web'; $Apache::lonxml::debug=1; if ($ENV{'browser.mathml'}) { $request->content_type('text/xml');