From 4e5cd85f8f19880be2521048426d413f4bbb8931 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 5 Sep 2024 14:09:12 +0200
Subject: [PATCH] unicode: silence perl warning about empty query range offsets

Stop complaining [Argument "" isn't numeric] about implicit 0- in presets
like 'latin/sample=-1'.
---
 unicode.plp | 1 +
 1 file changed, 1 insertion(+)

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