From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 27 May 2019 21:38:49 +0000 (+0200)
Subject: charset: silence warning of empty cell arguments
X-Git-Tag: v1.12~31
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/57d7837d68c29e4e70f8eeff74c4414652026c3d

charset: silence warning of empty cell arguments

Ignored arguments cause a harmless warning with newer perls:
> Redundant argument in sprintf
---

diff --git a/charset.plp b/charset.plp
index f9c50d8..c924d5e 100644
--- a/charset.plp
+++ b/charset.plp
@@ -347,8 +347,8 @@ for my $row (@request) {
 				$visible->{$glyph}++;
 			}
 
-			say sprintf $class ? '<td title="%s" class="X %s">%s' : '<td title="%s">',
-				$name, $class, $cell;
+			print '<td title="%s"', $name;
+			say $class ? sprintf(' class="X %s">%s', $class, $cell) : '>';
 		}
 		continue {
 			$offset += $colsize;