texlive[73524] Master/tlpkg/TeXLive/TLUtils.pm: TLUtils.pm

[commits+karl at tug.org]

Revision: 73524
          https://tug.org/svn/texlive?view=revision&revision=73524
Author:   karl
Date:     2025-01-20 17:18:12 +0100 (Mon, 20 Jan 2025)
Log Message:
-----------
TLUtils.pm (parse_AddHyphen_line): erroneous left/righthyphenmin might
not be numeric.

Modified Paths:
--------------
    trunk/Master/tlpkg/TeXLive/TLUtils.pm

Modified: trunk/Master/tlpkg/TeXLive/TLUtils.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLUtils.pm	2025-01-20 00:42:04 UTC (rev 73523)
+++ trunk/Master/tlpkg/TeXLive/TLUtils.pm	2025-01-20 16:18:12 UTC (rev 73524)
@@ -3765,12 +3765,14 @@
     $ret{"error"} = "AddHyphen is missing name setting: $a";
     return %ret;    
   }
-  if ($ret{"lefthyphenmin"} < 0) {
-    $ret{"error"} = "AddHyphen is missing lefthyphemin setting: $a";
+  if ($ret{"lefthyphenmin"} !~ /^[0-9]$/) {
+    $ret{"error"} = "AddHyphen has missing or bad "
+                    . " lefthyphenmin ($ret{lefthyphenmin}): $a";
     return %ret;    
   }
-  if ($ret{"righthyphenmin"} < 0) {
-    $ret{"error"} = "AddHyphen is missing righthyphemin setting: $a";
+  if ($ret{"righthyphenmin"} !~ /^[0-9]$/) {
+    $ret{"error"} = "AddHyphen has missing or bad "
+                    . " righthyphenmin ($ret{righthyphenmin}): $a";
     return %ret;    
   }
   # this default value couldn't be set earlier