mirrors/cpython
1
0
Fork 0
mirror of https://github.com/python/cpython.git synced 2025-07-24 11:44:31 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 8

This fixes a (minor) problem discovered by AMK when you don't want any

Browse source 
special markup for the first column of a table using {tableii} or {tableiii}.
In LaTeX, this requires using "textrm" as the formatting function, and this
is needed to remove the bogus "<textrm>" that gets generated otherwise.
There should probably be a more general mapping of specified markup to useful
markup, but that doesn't appear needed at the moment.

do_env_tableii(), do_env_tableiii():  If the markup for the first column is
	\textrm, make it empty.

do_cmd_lineii(), do_cmd_lineiii():  If the markup for the first column is
	empty, don't add markup around the text.
This commit is contained in:
Fred Drake 1998-04-02 20:14:04 +00:00
parent 3a18f3ba38
commit 58b2bfd0bf
1 changed files with 16 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

22
Doc/perl/python.perl
View file

@ -742,6 +742,8 @@ sub do_env_tableii{
"$next_pair_rx$any_next_pair_rx3$any_next_pair_rx5$any_next_pair_rx7";
if (/$tableiii_rx/o) {
$font = $4;
$font = ''
if ($font eq 'textrm');
$h1 = $6;
$h2 = $8;
}
@ -758,10 +760,13 @@ sub do_cmd_lineii{
s/$next_pair_pr_rx//o;
my $c1 = $2;
s/$next_pair_pr_rx//o;
my $c2 = $2;
my $font = $globals{"lineifont"};
my($c2,$font,$efont) = ($2, $globals{"lineifont"}, '');
if ($font) {
$font = "<$font>";
$efont = "</$font>";
}
my($c1align,$c2align) = @col_aligns[0,1];
"<tr>$c1align<$font>$c1</$font></td>\n"
"<tr>$c1align$font$c1$efont</td>\n"
. " $c2align$c2</td>$'";
}
@ -774,6 +779,8 @@ sub do_env_tableiii{
. "$any_next_pair_rx9";
if (/$tableiii_rx/o) {
$font = $4;
$font = ''
if ($font eq 'textrm');
$h1 = $6;
$h2 = $8;
$h3 = $10;
@ -794,10 +801,13 @@ sub do_cmd_lineiii{
s/$next_pair_pr_rx//o;
my $c2 = $2;
s/$next_pair_pr_rx//o;
my $c3 = $2;
my $font = $globals{"lineifont"};
my($c3,$font,$efont) = ($2, $globals{"lineifont"}, '');
if ($font) {
$font = "<$font>";
$efont = "</$font>";
}
my($c1align, $c2align, $c3align) = @col_aligns;
"<tr>$c1align<$font>$c1</$font></td>\n"
"<tr>$c1align$font$c1$efont</td>\n"
. " $c2align$c2</td>\n"
. " $c3align$c3</td>$'";
}