From: Mischa POSLAWSKY <perl@shiar.org>
Date: Fri, 21 Apr 2017 14:16:55 +0000 (+0200)
Subject: charset: indicate continued columns without overlap
X-Git-Tag: v1.10~118
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/fc86468387a30434587a1ec138256813bf5cf7b1

charset: indicate continued columns without overlap

Ellipsis to indicate next row, (ditto) quotes for previous.
---

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';