diff options
author | V3n3RiX <venerix@koprulu.sector> | 2023-08-29 10:04:55 +0100 |
---|---|---|
committer | V3n3RiX <venerix@koprulu.sector> | 2023-08-29 10:04:55 +0100 |
commit | 20325cfc3bd40d48d3c7034afaac4f5193d9c704 (patch) | |
tree | b8e6ff7fc02271595e20f956b32cef56c41dafca /dev-lang/perl | |
parent | 14a6858a7d8bc085420a1430b3a3f67885019f27 (diff) |
gentoo auto-resync : 29:08:2023 - 10:04:54
Diffstat (limited to 'dev-lang/perl')
-rw-r--r-- | dev-lang/perl/Manifest | 1 | ||||
-rw-r--r-- | dev-lang/perl/files/perl-5.34.0-fallback-getcwd-pwd.patch | 263 |
2 files changed, 0 insertions, 264 deletions
diff --git a/dev-lang/perl/Manifest b/dev-lang/perl/Manifest index f11f9d5e71b6..f1793d15a16e 100644 --- a/dev-lang/perl/Manifest +++ b/dev-lang/perl/Manifest @@ -1,5 +1,4 @@ AUX perl-5.34.0-crossfit.patch 388 BLAKE2B dda2f10732422857f1a3977b6aa6ec0536dffaa53658e23378083393a55cf283906ef8f41dde2eb83e0de4e5dfd6dcd06d6b236f0a91c44086172bcaf105396a SHA512 5da4dd913790bd125667851807da9e37dac9cda78cce18ecffb8780f42d30b65f46817633e65027f5438f1a39286139fcf961d4bc98caf70946152200c3e72ee -AUX perl-5.34.0-fallback-getcwd-pwd.patch 8158 BLAKE2B a6870b26dbfadb54c5ea4f075a4a5caad8d789853aade84ff434e5d994e9fdd82cdef6314a576b8cdb3a9948aa73aa650c1ff4656e9c8bca4fb58384396332b1 SHA512 fe778c2348da48006927b179d02d33489790f41afa079fabe6350853b2b2d8c168d0db7b81f1b6c988e3ac46d733326aab4aa4423a04d6380acf74eed91cfc5c AUX perl-5.36.0-clang16.patch 3850 BLAKE2B f691e7e23b18c5fe32b4f17fc0c786082fb1474fc3c06a46d6ef3b8609f10537b797308f403d4ca394a2666d752421fe2e7c0c224994c5271dd9211ba5d56652 SHA512 17d022d3a5909ecdf5e2c896d9c36caba006c4b3d0ed466a2c679b874210e7f84e0efcbc0ab5eea41e3eda0344fd869af46639ac94a0b943e961fb4044ced966 AUX perl-5.36.1-http-tiny.patch 3707 BLAKE2B 8fcbf0e1df773ee2ff06fdb3242b007a271c240f019b1bc95c19cc81fcc1756f79b7cf61e70b50eb8e295ab8afaaa5cb361682bacbf8c21e6ff7067c0eba59df SHA512 a9b25496e606c6035781448bc067282a2c38a20fd6418cf91034f730361a9d0ae7c96ace98310a93c6f652a71b8a8b331b85fbdf9bd2c3b6fe82efc25dd27de5 DIST perl-5.36.0-patches-1.tar.xz 20352 BLAKE2B f5413c75c5bbced230ad7fa692998caef8e4041f3394ae5212dc2aaee465de619b56cf07551be1bb36f2e06b9ed7d0ddda31ad4a7ec81d5c0c64b698ddd80379 SHA512 ab24577b6d71a13d9ccf272efa0881b29933b6a39532ca0d71d4c9a134f451bbe5f3d87c6c851f26114702ac3f92af5c5a72129a458ebee31e372106955eb157 diff --git a/dev-lang/perl/files/perl-5.34.0-fallback-getcwd-pwd.patch b/dev-lang/perl/files/perl-5.34.0-fallback-getcwd-pwd.patch deleted file mode 100644 index 849a09a39a05..000000000000 --- a/dev-lang/perl/files/perl-5.34.0-fallback-getcwd-pwd.patch +++ /dev/null @@ -1,263 +0,0 @@ -https://github.com/Perl/perl5/pull/18791 -https://github.com/Perl/perl5/issues/18703 -https://bugs.gentoo.org/818172 - -From: Tony Cook <tony@develop-help.com> -Date: Tue, 4 May 2021 14:55:50 +1000 -Subject: [PATCH 1/4] remove code that assuming finding pwd on the path is - reasonable - -We deliberately clear PATH when invoking pwd, so this search is -useless. ---- - dist/PathTools/Cwd.pm | 14 -------------- - 1 file changed, 14 deletions(-) - -diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm -index 6a1d2f17ee57..49c12885b32e 100644 ---- a/dist/PathTools/Cwd.pm -+++ b/dist/PathTools/Cwd.pm -@@ -213,20 +213,6 @@ sub _backtick_pwd { - # we take care not to override an existing definition for cwd(). - - unless ($METHOD_MAP{$^O}{cwd} or defined &cwd) { -- # The pwd command is not available in some chroot(2)'ed environments -- my $sep = $Config::Config{path_sep} || ':'; -- my $os = $^O; # Protect $^O from tainting -- -- -- # Try again to find a pwd, this time searching the whole PATH. -- if (defined $ENV{PATH} and $os ne 'MSWin32') { # no pwd on Windows -- my @candidates = split($sep, $ENV{PATH}); -- while (!$found_pwd_cmd and @candidates) { -- my $candidate = shift @candidates; -- $found_pwd_cmd = 1 if -x "$candidate/pwd"; -- } -- } -- - if( $found_pwd_cmd ) - { - *cwd = \&_backtick_pwd; - -From e5378ea37c6c4910107975d8099c1d552af0c7b3 Mon Sep 17 00:00:00 2001 -From: Tony Cook <tony@develop-help.com> -Date: Wed, 5 May 2021 10:12:31 +1000 -Subject: [PATCH 2/4] don't fallback to simple pwd - -When _backtick_pwd invokes $pwd_cmd it first clears the PATH, and since -the command has no shell metacharacters, it perl won't invoke the -shell, so it will always fail. - -An alternative here might be to use "/bin/sh -c pwd" but there's no -guarantee that pwd is available as a shell builtin. ---- - dist/PathTools/Cwd.pm | 6 ------ - 1 file changed, 6 deletions(-) - -diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm -index 49c12885b32e..fbe683e20b8a 100644 ---- a/dist/PathTools/Cwd.pm -+++ b/dist/PathTools/Cwd.pm -@@ -181,12 +181,6 @@ if ($^O =~ /android/) { - } - - my $found_pwd_cmd = defined($pwd_cmd); --unless ($pwd_cmd) { -- # Isn't this wrong? _backtick_pwd() will fail if someone has -- # pwd in their path but it is not /bin/pwd or /usr/bin/pwd? -- # See [perl #16774]. --jhi -- $pwd_cmd = 'pwd'; --} - - # Lazy-load Carp - sub _carp { require Carp; Carp::carp(@_) } - -From e14ffd3c21efe708a5fb5e25f29d61ccb6ee0a0a Mon Sep 17 00:00:00 2001 -From: Tony Cook <tony@develop-help.com> -Date: Tue, 4 May 2021 15:04:25 +1000 -Subject: [PATCH 3/4] avoid a prototype warning assigning \&getcwd to *cwd - -This would produce a warning if we fallback to using getcwd() where -getcwd() has a prototype. ---- - dist/PathTools/Cwd.pm | 3 ++- - 1 file changed, 2 insertions(+), 1 deletion(-) - -diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm -index fbe683e20b8a..b6dc0b798e8c 100644 ---- a/dist/PathTools/Cwd.pm -+++ b/dist/PathTools/Cwd.pm -@@ -212,7 +212,8 @@ unless ($METHOD_MAP{$^O}{cwd} or defined &cwd) { - *cwd = \&_backtick_pwd; - } - else { -- *cwd = \&getcwd; -+ # getcwd() might have an empty prototype -+ *cwd = sub { getcwd(); }; - } - } - - -From e725e6ced4d2bbb6a5866992509c2ac3e995c228 Mon Sep 17 00:00:00 2001 -From: Tony Cook <tony@develop-help.com> -Date: Wed, 12 May 2021 12:24:59 +1000 -Subject: [PATCH 4/4] bump PathTools to 3.81 - ---- - dist/PathTools/Cwd.pm | 2 +- - dist/PathTools/lib/File/Spec.pm | 2 +- - dist/PathTools/lib/File/Spec/AmigaOS.pm | 2 +- - dist/PathTools/lib/File/Spec/Cygwin.pm | 2 +- - dist/PathTools/lib/File/Spec/Epoc.pm | 2 +- - dist/PathTools/lib/File/Spec/Functions.pm | 2 +- - dist/PathTools/lib/File/Spec/Mac.pm | 2 +- - dist/PathTools/lib/File/Spec/OS2.pm | 2 +- - dist/PathTools/lib/File/Spec/Unix.pm | 2 +- - dist/PathTools/lib/File/Spec/VMS.pm | 2 +- - dist/PathTools/lib/File/Spec/Win32.pm | 2 +- - 11 files changed, 11 insertions(+), 11 deletions(-) - -diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm -index b6dc0b798e8c..4a9c786c1c3c 100644 ---- a/dist/PathTools/Cwd.pm -+++ b/dist/PathTools/Cwd.pm -@@ -3,7 +3,7 @@ use strict; - use Exporter; - - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - my $xs_version = $VERSION; - $VERSION =~ tr/_//d; - -diff --git a/dist/PathTools/lib/File/Spec.pm b/dist/PathTools/lib/File/Spec.pm -index 30d883b61b3e..fe738acf58bd 100644 ---- a/dist/PathTools/lib/File/Spec.pm -+++ b/dist/PathTools/lib/File/Spec.pm -@@ -2,7 +2,7 @@ package File::Spec; - - use strict; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - my %module = ( -diff --git a/dist/PathTools/lib/File/Spec/AmigaOS.pm b/dist/PathTools/lib/File/Spec/AmigaOS.pm -index fd9da81cdf5a..1398379ca57c 100644 ---- a/dist/PathTools/lib/File/Spec/AmigaOS.pm -+++ b/dist/PathTools/lib/File/Spec/AmigaOS.pm -@@ -3,7 +3,7 @@ package File::Spec::AmigaOS; - use strict; - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); -diff --git a/dist/PathTools/lib/File/Spec/Cygwin.pm b/dist/PathTools/lib/File/Spec/Cygwin.pm -index 953c23361a10..55d551ce0663 100644 ---- a/dist/PathTools/lib/File/Spec/Cygwin.pm -+++ b/dist/PathTools/lib/File/Spec/Cygwin.pm -@@ -3,7 +3,7 @@ package File::Spec::Cygwin; - use strict; - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); -diff --git a/dist/PathTools/lib/File/Spec/Epoc.pm b/dist/PathTools/lib/File/Spec/Epoc.pm -index fcb9e894e33c..4cde744231aa 100644 ---- a/dist/PathTools/lib/File/Spec/Epoc.pm -+++ b/dist/PathTools/lib/File/Spec/Epoc.pm -@@ -2,7 +2,7 @@ package File::Spec::Epoc; - - use strict; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - require File::Spec::Unix; -diff --git a/dist/PathTools/lib/File/Spec/Functions.pm b/dist/PathTools/lib/File/Spec/Functions.pm -index e14ad2f74538..4b3d7bbde130 100644 ---- a/dist/PathTools/lib/File/Spec/Functions.pm -+++ b/dist/PathTools/lib/File/Spec/Functions.pm -@@ -3,7 +3,7 @@ package File::Spec::Functions; - use File::Spec; - use strict; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - require Exporter; -diff --git a/dist/PathTools/lib/File/Spec/Mac.pm b/dist/PathTools/lib/File/Spec/Mac.pm -index 8026edcb1261..51d00a01f6f7 100644 ---- a/dist/PathTools/lib/File/Spec/Mac.pm -+++ b/dist/PathTools/lib/File/Spec/Mac.pm -@@ -4,7 +4,7 @@ use strict; - use Cwd (); - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); -diff --git a/dist/PathTools/lib/File/Spec/OS2.pm b/dist/PathTools/lib/File/Spec/OS2.pm -index 3c35ba99b48a..57d67ba01e93 100644 ---- a/dist/PathTools/lib/File/Spec/OS2.pm -+++ b/dist/PathTools/lib/File/Spec/OS2.pm -@@ -4,7 +4,7 @@ use strict; - use Cwd (); - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); -diff --git a/dist/PathTools/lib/File/Spec/Unix.pm b/dist/PathTools/lib/File/Spec/Unix.pm -index c06d18f46819..df98f580c3ea 100644 ---- a/dist/PathTools/lib/File/Spec/Unix.pm -+++ b/dist/PathTools/lib/File/Spec/Unix.pm -@@ -3,7 +3,7 @@ package File::Spec::Unix; - use strict; - use Cwd (); - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - =head1 NAME -diff --git a/dist/PathTools/lib/File/Spec/VMS.pm b/dist/PathTools/lib/File/Spec/VMS.pm -index 9b78c8b4bc6e..bbff3ad7d807 100644 ---- a/dist/PathTools/lib/File/Spec/VMS.pm -+++ b/dist/PathTools/lib/File/Spec/VMS.pm -@@ -4,7 +4,7 @@ use strict; - use Cwd (); - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); -diff --git a/dist/PathTools/lib/File/Spec/Win32.pm b/dist/PathTools/lib/File/Spec/Win32.pm -index 153744202338..b38419cdf1a6 100644 ---- a/dist/PathTools/lib/File/Spec/Win32.pm -+++ b/dist/PathTools/lib/File/Spec/Win32.pm -@@ -5,7 +5,7 @@ use strict; - use Cwd (); - require File::Spec::Unix; - --our $VERSION = '3.80'; -+our $VERSION = '3.81'; - $VERSION =~ tr/_//d; - - our @ISA = qw(File::Spec::Unix); - |