From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 26 Oct 2023 22:24:23 +0000 (+0200)
Subject: apl: restore styling of empty meaning cells
X-Git-Tag: v1.14~1
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/42a8fa5c4e57c2851c78141e1b1c8388fac71615

apl: restore styling of empty meaning cells

Broken in commit v1.13-22-g97470ff139 (2022-06-04)
[apl: silence warning about printf parameters].
---

diff --git a/apl.plp b/apl.plp
index 395cf20..302a55d 100644
--- a/apl.plp
+++ b/apl.plp
@@ -70,7 +70,7 @@ for my $op (@{$ops}) {
 	printf(
 		'<td%s>%s',
 		map { defined ? (!!$_->[1] && qq( title="$_->[1]"), $_->[0]) : (' class=Xi', '') }
-		[map { EscapeHTML($_) } split /\n/, $_, 2]
+		$_ && [map { EscapeHTML($_) } split /\n/, $_, 2]
 	) for $monad, $dyad;
 	say '</td>';
 }