version 1.3, 2000/07/18 21:27:10
|
version 1.4, 2000/07/19 20:21:19
|
Line 13 sub BEGIN {
|
Line 13 sub BEGIN {
|
} |
} |
|
|
#===================================================================== TAG SUBROUTINES |
#===================================================================== TAG SUBROUTINES |
#----------------------------------------------------------------------------- <m> tag |
#-- <m> tag |
sub start_m { |
sub start_m { |
my ($target,$token) = @_; |
my ($target,$token,$parstack,$parser) = @_; |
my $currentstring = ''; |
my $currentstring = ''; |
if ($target eq 'web') { |
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') { |
} elsif ($target eq 'tex') { |
$currentstring = "\$"; |
$currentstring = "\$"; |
} |
} |
Line 28 sub BEGIN {
|
Line 29 sub BEGIN {
|
my ($target,$token) = @_; |
my ($target,$token) = @_; |
my $currentstring = ''; |
my $currentstring = ''; |
if ($target eq 'web') { |
if ($target eq 'web') { |
$currentstring = "\".'\$') "; |
|
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$currentstring = "\$"; |
$currentstring = "\$"; |
} |
} |