From 94d2617063ee5d7e3a8fdec583169bdf6e7f9093 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 29 Oct 2023 02:51:53 +0100
Subject: [PATCH] unicode: fix syntax error in selection row loop

---
 unicode.plp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/unicode.plp b/unicode.plp
index edad58c..a7d5459 100644
--- a/unicode.plp
+++ b/unicode.plp
@@ -149,7 +149,7 @@ $glyphs->print(map {
 
 		if (@select) {
 			my $rowlen;
-			for ($rowlen = 1; $rowlen++; $rowlen <= $#$table) {
+			for ($rowlen = 1; $rowlen <= $#$table; $rowlen++) {
 				last if $table->[$rowlen] =~ /\./;
 			}
 			my @cells = map {
-- 
2.30.0