commit 46a39848ede4744cb883c52809f960547ae4868a Author: overweight <5324761+overweight@user.noreply.gitee.com> Date: Mon Sep 30 11:12:11 2019 -0400 Package init diff --git a/Exporter-5.70-Upgrade-to-5.72.patch b/Exporter-5.70-Upgrade-to-5.72.patch new file mode 100644 index 0000000..e19a074 --- /dev/null +++ b/Exporter-5.70-Upgrade-to-5.72.patch @@ -0,0 +1,38 @@ +From 6e7210f1ad3f709f846a812ab7db6543af90c477 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= +Date: Wed, 6 May 2015 12:35:17 +0200 +Subject: [PATCH] Upgrade to 5.72 +MIME-Version: 1.0 +Content-Type: text/plain; charset=UTF-8 +Content-Transfer-Encoding: 8bit + +Signed-off-by: Petr Písař +--- + lib/Exporter.pm | 4 ++-- + 1 file changed, 2 insertions(+), 2 deletions(-) + +diff --git a/lib/Exporter.pm b/lib/Exporter.pm +index 4930505..0b3db21 100644 +--- a/lib/Exporter.pm ++++ b/lib/Exporter.pm +@@ -9,7 +9,7 @@ require 5.006; + our $Debug = 0; + our $ExportLevel = 0; + our $Verbose ||= 0; +-our $VERSION = '5.70'; ++our $VERSION = '5.72'; + our (%Cache); + + sub as_heavy { +@@ -223,7 +223,7 @@ right. Specifications are in the form: + + [!]name This name only + [!]:DEFAULT All names in @EXPORT +- [!]:tag All names in $EXPORT_TAGS{tag} anonymous list ++ [!]:tag All names in $EXPORT_TAGS{tag} anonymous array + [!]/pattern/ All names in @EXPORT and @EXPORT_OK which match + + A leading ! indicates that matching names should be deleted from the +-- +2.1.0 + diff --git a/Exporter-5.70.tar.gz b/Exporter-5.70.tar.gz new file mode 100644 index 0000000..19b971d Binary files /dev/null and b/Exporter-5.70.tar.gz differ diff --git a/Exporter-5.72-Upgrade-to-5.73.patch b/Exporter-5.72-Upgrade-to-5.73.patch new file mode 100644 index 0000000..4f9655b --- /dev/null +++ b/Exporter-5.72-Upgrade-to-5.73.patch @@ -0,0 +1,116 @@ +From 2c6f580d94d78b0a8e120ba86858ffcb003b08eb Mon Sep 17 00:00:00 2001 +From: Jitka Plesnikova +Date: Thu, 24 May 2018 09:38:04 +0200 +Subject: [PATCH] Upgrade to 5.73 + +--- + lib/Exporter.pm | 32 ++++++++++++++++---------------- + 1 file changed, 16 insertions(+), 16 deletions(-) + +diff --git a/lib/Exporter.pm b/lib/Exporter.pm +index 0b3db21..0e8775d 100644 +--- a/lib/Exporter.pm ++++ b/lib/Exporter.pm +@@ -9,7 +9,7 @@ require 5.006; + our $Debug = 0; + our $ExportLevel = 0; + our $Verbose ||= 0; +-our $VERSION = '5.72'; ++our $VERSION = '5.73'; + our (%Cache); + + sub as_heavy { +@@ -106,14 +106,14 @@ In module F: + + package YourModule; + require Exporter; +- @ISA = qw(Exporter); +- @EXPORT_OK = qw(munge frobnicate); # symbols to export on request ++ our @ISA = qw(Exporter); ++ our @EXPORT_OK = qw(munge frobnicate); # symbols to export on request + + or + + package YourModule; + use Exporter 'import'; # gives you Exporter's import() method directly +- @EXPORT_OK = qw(munge frobnicate); # symbols to export on request ++ our @EXPORT_OK = qw(munge frobnicate); # symbols to export on request + + In other files which wish to use C: + +@@ -146,8 +146,8 @@ symbols can represent functions, scalars, arrays, hashes, or typeglobs. + The symbols must be given by full name with the exception that the + ampersand in front of a function is optional, e.g. + +- @EXPORT = qw(afunc $scalar @array); # afunc is a function +- @EXPORT_OK = qw(&bfunc %hash *typeglob); # explicit prefix on &bfunc ++ our @EXPORT = qw(afunc $scalar @array); # afunc is a function ++ our @EXPORT_OK = qw(&bfunc %hash *typeglob); # explicit prefix on &bfunc + + If you are only exporting function names it is recommended to omit the + ampersand, as the implementation is faster this way. +@@ -234,9 +234,9 @@ include :DEFAULT explicitly. + + e.g., F defines: + +- @EXPORT = qw(A1 A2 A3 A4 A5); +- @EXPORT_OK = qw(B1 B2 B3 B4 B5); +- %EXPORT_TAGS = (T1 => [qw(A1 A2 B1 B2)], T2 => [qw(A1 A2 B3 B4)]); ++ our @EXPORT = qw(A1 A2 A3 A4 A5); ++ our @EXPORT_OK = qw(B1 B2 B3 B4 B5); ++ our %EXPORT_TAGS = (T1 => [qw(A1 A2 B1 B2)], T2 => [qw(A1 A2 B3 B4)]); + + Note that you cannot use tags in @EXPORT or @EXPORT_OK. + +@@ -279,8 +279,8 @@ import function: + + package A; + +- @ISA = qw(Exporter); +- @EXPORT_OK = qw($b); ++ our @ISA = qw(Exporter); ++ our @EXPORT_OK = qw($b); + + sub import + { +@@ -293,8 +293,8 @@ inheritance, as it stands Exporter::import() will never get called. + Instead, say the following: + + package A; +- @ISA = qw(Exporter); +- @EXPORT_OK = qw($b); ++ our @ISA = qw(Exporter); ++ our @EXPORT_OK = qw($b); + + sub import + { +@@ -374,7 +374,7 @@ Since the symbols listed within C<%EXPORT_TAGS> must also appear in either + C<@EXPORT> or C<@EXPORT_OK>, two utility functions are provided which allow + you to easily add tagged sets of symbols to C<@EXPORT> or C<@EXPORT_OK>: + +- %EXPORT_TAGS = (foo => [qw(aa bb cc)], bar => [qw(aa cc dd)]); ++ our %EXPORT_TAGS = (foo => [qw(aa bb cc)], bar => [qw(aa cc dd)]); + + Exporter::export_tags('foo'); # add aa, bb and cc to @EXPORT + Exporter::export_ok_tags('bar'); # add aa, cc and dd to @EXPORT_OK +@@ -391,7 +391,7 @@ useful to create the utility ":all" to simplify "use" statements. + + The simplest way to do this is: + +- %EXPORT_TAGS = (foo => [qw(aa bb cc)], bar => [qw(aa cc dd)]); ++ our %EXPORT_TAGS = (foo => [qw(aa bb cc)], bar => [qw(aa cc dd)]); + + # add all the other ":class" tags to the ":all" class, + # deleting duplicates +@@ -460,7 +460,7 @@ variables C<@EXPORT_OK>, C<@EXPORT>, C<@ISA>, etc. + our @ISA = qw(Exporter); + our @EXPORT_OK = qw(munge frobnicate); + +-If backward compatibility for Perls under 5.6 is important, ++If backward compatibility for Perls B 5.6 is important, + one must write instead a C statement. + + use vars qw(@ISA @EXPORT_OK); +-- +2.14.3 + diff --git a/perl-Exporter.spec b/perl-Exporter.spec new file mode 100644 index 0000000..83ad8fd --- /dev/null +++ b/perl-Exporter.spec @@ -0,0 +1,60 @@ +Name: perl-Exporter +Version: 5.73 +Release: 419 +Summary: Implements default import method for modules +License: GPL+ or Artistic +URL: https://metacpan.org/release/Exporter +Source0: https://cpan.metacpan.org/authors/id/T/TO/TODDR/Exporter-5.70.tar.gz + +Patch0: Exporter-5.70-Upgrade-to-5.72.patch +Patch1: Exporter-5.72-Upgrade-to-5.73.patch + +BuildArch: noarch +BuildRequires: perl-interpreter perl-generators git +BuildRequires: perl(ExtUtils::MakeMaker) +BuildRequires: perl(Carp) >= 1.05 perl(strict) perl(warnings) +BuildRequires: perl(Test::More) perl(vars) +BuildRequires: perl(Test::Pod) >= 1.18 +Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) +Requires: perl(Carp) >= 1.05 perl(warnings) + +%description +The Exporter module implements an import method which allows a module to +export functions and variables to its users' name spaces. Many modules use +Exporter rather than implementing their own import method because Exporter +provides a highly flexible interface, with an implementation optimized for +the common case. + +%package help +Summary: Documents for %{name} +Buildarch: noarch +Requires: man + +%description help +Man pages and other related documents for %{name}. + +%prep +%autosetup -n Exporter-5.70 -p1 -S git + +%build +perl Makefile.PL INSTALLDIRS=vendor +%make_build + +%install +make pure_install DESTDIR=$RPM_BUILD_ROOT +find $RPM_BUILD_ROOT -type f -name .packlist | xargs rm -f +%{_fixperms} $RPM_BUILD_ROOT/* + +%check +make test + +%files +%doc Changes README +%{perl_vendorlib}/* + +%files help +%{_mandir}/man3/* + +%changelog +* Sat Sep 14 2019 guiyao - 5.73-419 +- Package Init