From fc86468387a30434587a1ec138256813bf5cf7b1 Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Fri, 21 Apr 2017 16:16:55 +0200 Subject: [PATCH 1/1] charset: indicate continued columns without overlap Ellipsis to indicate next row, (ditto) quotes for previous. --- charset.plp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/charset.plp b/charset.plp index c89c924..5955c39 100644 --- a/charset.plp +++ b/charset.plp @@ -346,15 +346,16 @@ sub range_cell { if ($len -= $rest) { # continued on new row my @next = ($len * $colsize, "$class joinu"); + my $separate = $cols - $len > $rest; # columns not on next row if ($len > $rest) { # minority remains push @next, $name, $title; $title ||= $name; - $name = ''; + $name = $separate && '…'; } else { # minority on next row - push @next, '"', $title || $name; + push @next, $separate && '"', $title || $name; } $table->{$offset + $colsize*$rest} //= \@next; $class .= ' joind'; -- 2.30.0