mirror of
https://github.com/fosslinux/live-bootstrap.git
synced 2026-03-20 02:02:58 +01:00
Clean up perl 5.15.7
This commit is contained in:
parent
a4616a9593
commit
b574ae96f8
5 changed files with 19 additions and 48 deletions
|
|
@ -1,3 +1,7 @@
|
||||||
|
# SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||||
|
#
|
||||||
|
# SPDX-License-Identifier: MIT
|
||||||
|
|
||||||
BUILD_ZLIB = False
|
BUILD_ZLIB = False
|
||||||
INCLUDE = /usr/include
|
INCLUDE = /usr/include
|
||||||
LIB = /usr/lib/i386-unknown-linux-musl
|
LIB = /usr/lib/i386-unknown-linux-musl
|
||||||
|
|
|
||||||
|
|
@ -64,6 +64,7 @@ src_configure() {
|
||||||
-Dusedl=false \
|
-Dusedl=false \
|
||||||
-Ddate=':' \
|
-Ddate=':' \
|
||||||
-Dusedevel \
|
-Dusedevel \
|
||||||
|
-Uversiononly \
|
||||||
-Dccflags="-U__DATE__ -U__TIME__" \
|
-Dccflags="-U__DATE__ -U__TIME__" \
|
||||||
-Darchname="i386-linux" \
|
-Darchname="i386-linux" \
|
||||||
-Dmyhostname="(none)" \
|
-Dmyhostname="(none)" \
|
||||||
|
|
@ -92,9 +93,6 @@ src_compile() {
|
||||||
src_install() {
|
src_install() {
|
||||||
default
|
default
|
||||||
|
|
||||||
# As this is a development version it does not install a perl symlink
|
|
||||||
ln -s perl5.15.7 "${DESTDIR}/${PREFIX}/bin/perl"
|
|
||||||
|
|
||||||
# Remove messed up manpages
|
# Remove messed up manpages
|
||||||
rm "${DESTDIR}/"*.0
|
rm "${DESTDIR}/"*.0
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -1,45 +0,0 @@
|
||||||
From b5bc060d03776870f3ead93e8c565069a66c2af9 Mon Sep 17 00:00:00 2001
|
|
||||||
From: Karl Williamson <public@khwilliamson.com>
|
|
||||||
Date: Mon, 18 Jun 2012 12:38:41 -0600
|
|
||||||
Subject: [PATCH] Unicode::UCD::prop_invlist() Allow to return internal
|
|
||||||
property
|
|
||||||
|
|
||||||
This creates an optional undocumented parameter to this function to
|
|
||||||
allow it to return the inversion list of an internal-only Perl property.
|
|
||||||
This will be used by other functions in Perl, but should not be
|
|
||||||
documented, as we don't want to encourage the use of internal-only
|
|
||||||
properties, which are subject to change or removal without notice.
|
|
||||||
---
|
|
||||||
lib/Unicode/UCD.pm | 8 ++++++--
|
|
||||||
1 file changed, 6 insertions(+), 2 deletions(-)
|
|
||||||
|
|
||||||
diff --git perl-5.15.7/lib/Unicode/UCD.pm perl-5.15.7/lib/Unicode/UCD.pm
|
|
||||||
index 17b4fead23..a809c21adc 100644
|
|
||||||
--- perl-5.15.7/lib/Unicode/UCD.pm
|
|
||||||
+++ perl-5.15.7/lib/Unicode/UCD.pm
|
|
||||||
@@ -1944,8 +1944,12 @@ properties, and will return C<undef> if called with one of those.
|
|
||||||
our %loose_defaults;
|
|
||||||
our $MAX_UNICODE_CODEPOINT;
|
|
||||||
|
|
||||||
-sub prop_invlist ($) {
|
|
||||||
+sub prop_invlist ($;$) {
|
|
||||||
my $prop = $_[0];
|
|
||||||
+
|
|
||||||
+ # Undocumented way to get at Perl internal properties
|
|
||||||
+ my $internal_ok = defined $_[1] && $_[1] eq '_perl_core_internal_ok';
|
|
||||||
+
|
|
||||||
return if ! defined $prop;
|
|
||||||
|
|
||||||
require "utf8_heavy.pl";
|
|
||||||
@@ -1962,7 +1966,7 @@ sub prop_invlist ($) {
|
|
||||||
|| ref $swash eq ""
|
|
||||||
|| $swash->{'BITS'} != 1
|
|
||||||
|| $swash->{'USER_DEFINED'}
|
|
||||||
- || $prop =~ /^\s*_/;
|
|
||||||
+ || (! $internal_ok && $prop =~ /^\s*_/);
|
|
||||||
|
|
||||||
if ($swash->{'EXTRAS'}) {
|
|
||||||
carp __PACKAGE__, "::prop_invlist: swash returned for $prop unexpectedly has EXTRAS magic";
|
|
||||||
--
|
|
||||||
2.49.1
|
|
||||||
|
|
||||||
|
|
@ -1,3 +1,10 @@
|
||||||
|
SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||||
|
|
||||||
|
SPDX-License-Identifier: Artistic-1.0
|
||||||
|
|
||||||
|
The /r specifier is not supported in perl 5.14. Thankfully, it is
|
||||||
|
not necessary here.
|
||||||
|
|
||||||
diff --git perl-5.15.7/regen/mk_PL_charclass.pl perl-5.15.7/regen/mk_PL_charclass.pl
|
diff --git perl-5.15.7/regen/mk_PL_charclass.pl perl-5.15.7/regen/mk_PL_charclass.pl
|
||||||
index a2f837fefc..f777ffe74d 100644
|
index a2f837fefc..f777ffe74d 100644
|
||||||
--- perl-5.15.7/regen/mk_PL_charclass.pl
|
--- perl-5.15.7/regen/mk_PL_charclass.pl
|
||||||
|
|
|
||||||
|
|
@ -1,3 +1,10 @@
|
||||||
|
SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||||
|
|
||||||
|
SPDX-License-Identifier: Artistic-1.0
|
||||||
|
|
||||||
|
Older versions of Bison produced 4 spaces before `goto yyerrlab`,
|
||||||
|
but ours produces more.
|
||||||
|
|
||||||
--- perl-5.15.7/x2p/Makefile.SH 2025-07-17 18:07:55.350717970 +1000
|
--- perl-5.15.7/x2p/Makefile.SH 2025-07-17 18:07:55.350717970 +1000
|
||||||
+++ perl-5.15.7/x2p/Makefile.SH 2025-07-17 18:09:02.340711269 +1000
|
+++ perl-5.15.7/x2p/Makefile.SH 2025-07-17 18:09:02.340711269 +1000
|
||||||
@@ -123,7 +123,7 @@
|
@@ -123,7 +123,7 @@
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue