commit ecbfceb31c38b7736fa19a7fe8b3f1158254b41d
author Fred Drake <fdrake@acm.org> Thu Sep 04 21:25:03 2003 +0000
committer Fred Drake <fdrake@acm.org> Thu Sep 04 21:25:03 2003 +0000
tree 16823ab1d10e6ae2ea8434bc25ee4f6d69c25af4
parent b79f343e61bc191d2a35db4e778410e3bbff23c0

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

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index b7545b3..da38cd2 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -1406,6 +1406,7 @@
     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 @@
     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 @@
     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 @@
     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 = '';