summaryrefslogtreecommitdiffstats
path: root/Doc
diff options
context:
space:
mode:
Diffstat (limited to 'Doc')
-rw-r--r--Doc/perl/python.perl10
1 files changed, 10 insertions, 0 deletions
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 @@ 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 = '';