From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 5 Sep 2024 12:09:12 +0000 (+0200)
Subject: unicode: silence perl warning about empty query range offsets
X-Git-Url: http://git.shiar.net/sheet.git/commitdiff_plain/4e5cd85f8f19880be2521048426d413f4bbb8931

unicode: silence perl warning about empty query range offsets

Stop complaining [Argument "" isn't numeric] about implicit 0- in presets
like 'latin/sample=-1'.
---

diff --git a/unicode.plp b/unicode.plp
index ffee44f..1f74144 100644
--- a/unicode.plp
+++ b/unicode.plp
@@ -152,6 +152,7 @@ $glyphs->print(map {
 				last if $table->[$rowlen] =~ /\./;
 			}
 			my @cells = map {
+				s/^(?=-)/0/;
 				my $end = (s/-(.+)?// ? ($1 // @$table / $rowlen - 1) : $_) + 1;
 				$_ * $rowlen .. $end * $rowlen - 1;
 			} @select;