Compare commits
No commits in common. 'c8-stream-5.30' and 'c9' have entirely different histories.
c8-stream-
...
c9
@ -1 +1 @@
|
|||||||
SOURCES/Exporter-5.70.tar.gz
|
SOURCES/Exporter-5.74.tar.gz
|
||||||
|
@ -1 +1 @@
|
|||||||
dbfc1c8aecd3d759502925187300235b4c59517f SOURCES/Exporter-5.70.tar.gz
|
9e6ebba472b8c763047ca2a5df189e5b4a16ef5e SOURCES/Exporter-5.74.tar.gz
|
||||||
|
@ -1,38 +0,0 @@
|
|||||||
From 6e7210f1ad3f709f846a812ab7db6543af90c477 Mon Sep 17 00:00:00 2001
|
|
||||||
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
|
|
||||||
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ř <ppisar@redhat.com>
|
|
||||||
---
|
|
||||||
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
|
|
||||||
|
|
@ -1,116 +0,0 @@
|
|||||||
From 2c6f580d94d78b0a8e120ba86858ffcb003b08eb Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jitka Plesnikova <jplesnik@redhat.com>
|
|
||||||
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<YourModule.pm>:
|
|
||||||
|
|
||||||
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<YourModule>:
|
|
||||||
|
|
||||||
@@ -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<Module.pm> 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<under> 5.6 is important,
|
|
||||||
one must write instead a C<use vars> statement.
|
|
||||||
|
|
||||||
use vars qw(@ISA @EXPORT_OK);
|
|
||||||
--
|
|
||||||
2.14.3
|
|
||||||
|
|
Loading…
Reference in new issue