--- loncom/xml/londefdef.pm 2000/07/18 21:27:10 1.3 +++ loncom/xml/londefdef.pm 2000/07/19 20:21:19 1.4 @@ -13,12 +13,13 @@ sub BEGIN { } #===================================================================== TAG SUBROUTINES -#----------------------------------------------------------------------------- tag +#-- tag sub start_m { - my ($target,$token) = @_; + my ($target,$token,$parstack,$parser) = @_; my $currentstring = ''; if ($target eq 'web') { - $currentstring = lontexconvert::converted('hi'); + my $inside = $parser->get_text("/m"); + $currentstring = &Apache::lontexconvert::converted('\\documentstyle{article}'.$inside); } elsif ($target eq 'tex') { $currentstring = "\$"; } @@ -28,7 +29,6 @@ sub BEGIN { my ($target,$token) = @_; my $currentstring = ''; if ($target eq 'web') { - $currentstring = "\".'\$') "; } elsif ($target eq 'tex') { $currentstring = "\$"; }