diff options
Diffstat (limited to 'dev-perl/Sub-Delete')
| -rw-r--r-- | dev-perl/Sub-Delete/Manifest | 2 | ||||
| -rw-r--r-- | dev-perl/Sub-Delete/Sub-Delete-1.0.20-r1.ebuild | 25 | ||||
| -rw-r--r-- | dev-perl/Sub-Delete/files/Sub-Delete-1.0.20-perl-separator.patch | 49 |
3 files changed, 76 insertions, 0 deletions
diff --git a/dev-perl/Sub-Delete/Manifest b/dev-perl/Sub-Delete/Manifest index b0e8f4a59db6..dc1f59be2534 100644 --- a/dev-perl/Sub-Delete/Manifest +++ b/dev-perl/Sub-Delete/Manifest @@ -1,3 +1,5 @@ +AUX Sub-Delete-1.0.20-perl-separator.patch 1394 BLAKE2B 9809f70bdfe4a498a65ad0c5e4d915cb916e593f30b63ebbe67d7cc8f863e326373506514840e76def0f0f5f5ec3f3a348d2375c66332dc34da406c1871244ed SHA512 a2e3eefa8e8784df3394947d4d9bdf82473652bc2acb6f1c5d655fdd946886bba49eef0aa2c7c4bae83a383c54b0818c2ff755ba48fad4119187a99bed2b35ad DIST Sub-Delete-1.00002.tar.gz 31437 BLAKE2B 4c622824c8e41f2c7eea6192799c6300fedc9b73a20ba1a40efe71b91effcb861884c8e38ca5e0001d4bcd5f77d6dca39d1167f1ed4aa18d78edb41486c35fba SHA512 41a926099634e24d805756123be6ed7153568b45acc061fa5b3d91141eea6a1c6109681a725f4351bcbe6ef320210d2f18800b7da7e9631574f535979ff22e06 +EBUILD Sub-Delete-1.0.20-r1.ebuild 451 BLAKE2B 6afbc482d68994df98749823fabc4781483505bbb583447257a5907b3f8859979bac94752521109ecef0f4fffeb97074354573ff40498991b8d93d59b78c46a1 SHA512 e2cfdac595d7e1fa800655a528237fdf914c57af59e145ed8eb3c2082445b8058ae0827e01a7bb74b54c7a208f28ec27f5f8a8772a6c60e11d9edcff53bc92d6 EBUILD Sub-Delete-1.0.20.ebuild 384 BLAKE2B 9a2b52590df6c812938b31bfad132bcac68f34e550de5285658592d64c0284ed02c8a3971c612113a32c7b9fe0c9661afa731871a8bdb7f612b889ef7dddf5fc SHA512 0db5c68ddbf5371eb9ce4bf07196e6889a6f6469a98378826bfba1db880d20579089522568edb71e1c04bf05ae3fe408000c50348a561265e21f6b0d112c8955 MISC metadata.xml 393 BLAKE2B e0a15e0a286c646512bf616c3542c02e471f21247e0cfced9601cd1f957beab551a768d7889c6540313b391ebc4332a6a9f2a1d350beae2a1fb7f0e170d205de SHA512 ff3e0a6112edcb1ebb7ecc470258b599400379ed68232b3915a646b1470585981fe7c4fd405928b87f8299031bb408892678aab4b0a51c32ca6214f975fe903e diff --git a/dev-perl/Sub-Delete/Sub-Delete-1.0.20-r1.ebuild b/dev-perl/Sub-Delete/Sub-Delete-1.0.20-r1.ebuild new file mode 100644 index 000000000000..b323832dfcaa --- /dev/null +++ b/dev-perl/Sub-Delete/Sub-Delete-1.0.20-r1.ebuild @@ -0,0 +1,25 @@ +# Copyright 2020-2023 Gentoo Authors +# Distributed under the terms of the GNU General Public License v2 + +EAPI=8 + +DIST_AUTHOR=SPROUT +DIST_VERSION=1.00002 +inherit perl-module + +DESCRIPTION="Perl module enabling one to delete subroutines" + +SLOT="0" +KEYWORDS="~amd64 ~riscv ~x86 ~x64-macos" + +RDEPEND=" + >=virtual/perl-Exporter-5.570.0 +" +BDEPEND=" + ${RDEPEND} + virtual/perl-ExtUtils-MakeMaker +" + +PATCHES=( + "${FILESDIR}"/${PN}-1.0.20-perl-separator.patch +) diff --git a/dev-perl/Sub-Delete/files/Sub-Delete-1.0.20-perl-separator.patch b/dev-perl/Sub-Delete/files/Sub-Delete-1.0.20-perl-separator.patch new file mode 100644 index 000000000000..3ee0ad04f085 --- /dev/null +++ b/dev-perl/Sub-Delete/files/Sub-Delete-1.0.20-perl-separator.patch @@ -0,0 +1,49 @@ +https://bugs.debian.org/1050447 +https://rt.cpan.org/Public/Bug/Display.html?id=146682 + +commit e0e7d68582b40ff309657358357f61055e9a2ae8 +Author: Yves Orton <demerphq@gmail.com> +Date: Thu Feb 23 15:14:12 2023 +0100 + + deal with deprecation of apostrophe as a package separator + + this package for some reason includes its own copy of Test::More + which includes isn't, the code also uses apostrophe as a package + separator. This usage was deprecated in perl 5.37.9, and support + for it will be removed sometime in 5.39. + +--- a/lib/Sub/Delete.pm ++++ b/lib/Sub/Delete.pm +@@ -44,7 +44,7 @@ sub delete_sub { + } + delete $stash->{$key}; + keys %imported_slots == 1 and exists $imported_slots{SCALAR} +- and !$imported_slots{SCALAR} and Internals'SvREFCNT $$glob =>== 1 ++ and !$imported_slots{SCALAR} and Internals::SvREFCNT $$glob =>== 1 + and !defined *$glob{IO} and !defined *$glob{FORMAT} + and return; # empty glob + my $newglob = \*$globname; +--- a/t/Test/More.pm ++++ b/t/Test/More.pm +@@ -335,9 +335,6 @@ sub isnt ($$;$) { + $tb->isnt_eq(@_); + } + +-*isn't = \&isnt; +- +- + =item B<like> + + like( $this, qr/that/, $test_name ); +--- a/t/test.t ++++ b/t/test.t +@@ -97,7 +97,7 @@ SKIP:{ + } + + # Make sure ‘use vars’ info is preserved. +-{ package gred; *'chit = \$'chit } # use vars ++{ package gred; *::chit = \$::chit } # use vars + sub chit; + delete_sub 'chit'; + { + |