emoji: silence unused argument warnings
authorMischa POSLAWSKY <perl@shiar.org>
Mon, 27 May 2019 21:42:55 +0000 (23:42 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Wed, 3 Jul 2019 16:15:02 +0000 (18:15 +0200)
Like the previous commit, but unconditionally useless here.

emoji.plp

index 1f4bf0161be18bb400318d3d66b454a60b6d81e6..41e4c129f0b4170a6234e6e52e8870dab4d45769 100644 (file)
--- a/emoji.plp
+++ b/emoji.plp
@@ -32,7 +32,7 @@ for my $system (qw'gmail msn yahoo') {
        for (my $i = 0; $i <= $#info; $i++) {
                my $name = $info[$i];
                unless (ref $info[$i+1] eq 'ARRAY') {
-                       say sprintf '</table><table><tbody>', $name;
+                       say '</table><table><tbody>';
                        next;
                }
                my ($input, $flags, $char, $desc) = @{ $info[++$i] };