SPDX-FileCopyrightText: 2025 Samuel Tyler SPDX-FileCopyrightText: 2012 Karl Williamson SPDX-License-Identifier: Artistic-1.0 From deca90bb9a589cdd796fae47d1dbe9d680f8884b Mon Sep 17 00:00:00 2001 From: Samuel Tyler Date: Fri, 22 Aug 2025 22:36:34 +1000 Subject: [PATCH] Revert "regen/mk_invlists.pl: Fail if inversion list not found" The symbol _Perl_Non_Final_Folds has not yet been added. Remove it for now, it is not necessary for this build. (It is unclear whether the inversion list changes affect the build, low priority TODO check if removing it is necessary. Doesn't hurt to leave it in.) This reverts commit ad89228c5b795cc268ecf73cf29290f8bc70e979. --- regen/mk_invlists.pl | 2 -- 1 file changed, 2 deletions(-) diff --git perl-5.17.2/regen/mk_invlists.pl perl-5.17.2/regen/mk_invlists.pl index 65d6995285..6eefbe7f15 100644 --- perl-5.17.2/regen/mk_invlists.pl +++ perl-5.17.2/regen/mk_invlists.pl @@ -126,7 +126,6 @@ for my $prop (qw( L1PosixWord PosixXDigit XPosixXDigit - _Perl_Non_Final_Folds ) ) { @@ -146,7 +145,6 @@ for my $prop (qw( my $lookup_prop = $prop; $lookup_prop =~ s/^L1Posix/XPosix/ or $lookup_prop =~ s/^L1//; my @invlist = prop_invlist($lookup_prop); - die "Could not find inversion list for '$lookup_prop'" unless @invlist; if ($lookup_prop ne $prop) { for my $i (0 .. @invlist - 1 - 1) { -- 2.49.1