version 1.5, 2000/10/12 13:51:50
|
version 1.6, 2000/10/26 14:01:40
|
Line 17 sub BEGIN {
|
Line 17 sub BEGIN {
|
sub start_m { |
sub start_m { |
my ($target,$token,$parstack,$parser) = @_; |
my ($target,$token,$parstack,$parser) = @_; |
my $currentstring = ''; |
my $currentstring = ''; |
|
if ($target eq 'meta') { |
|
my $inside = &Apache::lonxml::get_all_text("/m",$$parser[$#$parser]); |
|
$currentstring =''; |
|
} |
if ($target eq 'web') { |
if ($target eq 'web') { |
my $inside = &Apache::lonxml::get_all_text("/m",$$parser[$#$parser]); |
my $inside = &Apache::lonxml::get_all_text("/m",$$parser[$#$parser]); |
$inside ='\\documentstyle{article}'.$inside; |
$inside ='\\documentstyle{article}'.$inside; |
Line 35 sub BEGIN {
|
Line 39 sub BEGIN {
|
if ($target eq 'web') { |
if ($target eq 'web') { |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$currentstring = "\$"; |
$currentstring = "\$"; |
|
} elsif ($target eq 'meta') { |
} |
} |
return $currentstring; |
return $currentstring; |
} |
} |
Line 828 sub BEGIN {
|
Line 833 sub BEGIN {
|
} |
} |
return $currentstring; |
return $currentstring; |
} |
} |
|
sub end_hr { |
|
my ($target,$token) = @_; |
|
my $currentstring = ''; |
|
if ($target eq 'web') { |
|
$currentstring .= $token->[2]; |
|
} elsif ($target eq 'tex') { |
|
} |
|
return $currentstring; |
|
} |
#----------------------------------------------------------------------------- <a> tag |
#----------------------------------------------------------------------------- <a> tag |
sub start_a { |
sub start_a { |
my ($target,$token) = @_; |
my ($target,$token) = @_; |