From ecbfceb31c38b7736fa19a7fe8b3f1158254b41d Mon Sep 17 00:00:00 2001 From: Fred Drake Date: Thu, 4 Sep 2003 21:25:03 +0000 Subject: [PATCH] make sure cells are really generated for all table cells, even those that are left empty fixes first of the problems reported in SF bug #727692 --- Doc/perl/python.perl | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index b7545b32af..da38cd2590 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -1406,6 +1406,7 @@ sub do_cmd_lineii{ my $c2 = next_argument(); s/[\s\n]+//; my($sfont, $efont) = get_table_col1_fonts(); + $c1 = ' ' if ($c1 eq ''); $c2 = ' ' if ($c2 eq ''); my($c1align, $c2align) = split('\|', $aligns); my $padding = ''; @@ -1457,6 +1458,8 @@ sub do_cmd_lineiii{ my $c3 = next_argument(); s/[\s\n]+//; my($sfont, $efont) = get_table_col1_fonts(); + $c1 = ' ' if ($c1 eq ''); + $c2 = ' ' if ($c2 eq ''); $c3 = ' ' if ($c3 eq ''); my($c1align, $c2align, $c3align) = split('\|', $aligns); my $padding = ''; @@ -1513,6 +1516,9 @@ sub do_cmd_lineiv{ my $c4 = next_argument(); s/[\s\n]+//; my($sfont, $efont) = get_table_col1_fonts(); + $c1 = ' ' if ($c1 eq ''); + $c2 = ' ' if ($c2 eq ''); + $c3 = ' ' if ($c3 eq ''); $c4 = ' ' if ($c4 eq ''); my($c1align, $c2align, $c3align, $c4align) = split('\|', $aligns); my $padding = ''; @@ -1574,6 +1580,10 @@ sub do_cmd_linev{ my $c5 = next_argument(); s/[\s\n]+//; my($sfont, $efont) = get_table_col1_fonts(); + $c1 = ' ' if ($c1 eq ''); + $c2 = ' ' if ($c2 eq ''); + $c3 = ' ' if ($c3 eq ''); + $c4 = ' ' if ($c4 eq ''); $c5 = ' ' if ($c5 eq ''); my($c1align, $c2align, $c3align, $c4align, $c5align) = split('\|',$aligns); my $padding = ''; -- 2.50.1