version 1.226, 2004/07/12 17:19:13
|
version 1.227, 2004/07/12 17:57:36
|
Line 1152 sub start_br {
|
Line 1152 sub start_br {
|
if ($target eq 'web') { |
if ($target eq 'web') { |
$currentstring .= $token->[4]; |
$currentstring .= $token->[4]; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
if (($$tagstack[-2] eq 'b') || ($$tagstack[-2] eq 'strong') || |
my @tempo=@$tagstack; |
($$tagstack[-2] eq 'ol') || ($$tagstack[-2] eq 'ul')) { |
my $sygnal=0; |
|
for (my $i=$#tempo;$i>=0;$i--) { |
|
if (($tempo[$i] eq 'b') || ($tempo[$i] eq 'strong') || |
|
($tempo[$i] eq 'ol') || ($tempo[$i] eq 'ul')) { |
|
$sygnal=1; |
|
last; |
|
} |
|
} |
|
if ($sygnal) { |
$currentstring .= ' \vskip 0 mm '; |
$currentstring .= ' \vskip 0 mm '; |
} elsif ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') { |
} elsif ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') { |
$currentstring .= '\strut \\\\ \strut '; |
$currentstring .= '\strut \\\\ \strut '; |