Compare commits
No commits in common. "c8s" and "c9s" have entirely different histories.
3
.gitignore
vendored
3
.gitignore
vendored
@ -1,2 +1 @@
|
|||||||
SOURCES/Package-Stash-0.37.tar.gz
|
/Package-Stash-[0-9.]*\.tar\.gz
|
||||||
/Package-Stash-0.37.tar.gz
|
|
||||||
|
1
.perl-Package-Stash.metadata
Normal file
1
.perl-Package-Stash.metadata
Normal file
@ -0,0 +1 @@
|
|||||||
|
1327b925b319c3eabecdb54863a0ccccfe2c1f94 Package-Stash-0.39.tar.gz
|
@ -1,535 +0,0 @@
|
|||||||
--- t/addsub.t
|
|
||||||
+++ t/addsub.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 7;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
|
|
||||||
@@ -42,5 +42,3 @@ $foo_stash->add_symbol(
|
|
||||||
|
|
||||||
is $DB::sub{'Foo::dunk'}, sprintf "%s:%d-%d", "FileName", 100, 199,
|
|
||||||
'... got the right %DB::sub value for dunk with specified args';
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/anon-basic.t
|
|
||||||
+++ t/anon-basic.t
|
|
||||||
@@ -16,6 +16,8 @@ BEGIN {
|
|
||||||
use Test::Requires 'Package::Anon';
|
|
||||||
use Symbol;
|
|
||||||
|
|
||||||
+plan tests => 122;
|
|
||||||
+
|
|
||||||
my $Foo = Package::Anon->new('Foo');
|
|
||||||
$Foo->{SOME_CONSTANT} = \1;
|
|
||||||
|
|
||||||
@@ -402,5 +404,3 @@ $Quuux->{quuuux} = -1;
|
|
||||||
|
|
||||||
is_deeply([Package::Stash->new('Quuux')->list_all_symbols], [],
|
|
||||||
"Quuux:: isn't touched");
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/anon.t
|
|
||||||
+++ t/anon.t
|
|
||||||
@@ -16,6 +16,8 @@ BEGIN {
|
|
||||||
use Test::Requires 'Package::Anon';
|
|
||||||
use Symbol;
|
|
||||||
|
|
||||||
+plan tests => 7;
|
|
||||||
+
|
|
||||||
my $anon = Package::Anon->new;
|
|
||||||
my $stash = Package::Stash->new($anon);
|
|
||||||
my $obj = $anon->bless({});
|
|
||||||
@@ -47,5 +49,3 @@ my $obj = $anon->bless({});
|
|
||||||
qr/Undefined subroutine \&__ANON__::baz called/
|
|
||||||
);
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/bare-anon-basic.t
|
|
||||||
+++ t/bare-anon-basic.t
|
|
||||||
@@ -17,6 +17,8 @@ BEGIN {
|
|
||||||
|
|
||||||
use Symbol;
|
|
||||||
|
|
||||||
+plan tests => 10;
|
|
||||||
+
|
|
||||||
my $Foo = {};
|
|
||||||
$Foo->{SOME_CONSTANT} = \1;
|
|
||||||
|
|
||||||
@@ -396,5 +398,3 @@ $Quuux->{quuuux} = -1;
|
|
||||||
|
|
||||||
is_deeply([Package::Stash->new('Quuux')->list_all_symbols], [],
|
|
||||||
"Quuux:: isn't touched");
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/bare-anon.t
|
|
||||||
+++ t/bare-anon.t
|
|
||||||
@@ -17,6 +17,8 @@ BEGIN {
|
|
||||||
|
|
||||||
use Symbol;
|
|
||||||
|
|
||||||
+plan tests => 10;
|
|
||||||
+
|
|
||||||
my $anon = {};
|
|
||||||
my $stash = Package::Stash->new($anon);
|
|
||||||
# no way to bless something into a hashref yet
|
|
||||||
@@ -61,5 +63,3 @@ my $stash = Package::Stash->new($anon);
|
|
||||||
undef
|
|
||||||
);
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/basic.t
|
|
||||||
+++ t/basic.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 131;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
@@ -444,5 +444,3 @@ like(
|
|
||||||
qr/^Package::Stash->new must be passed the name of the package to access/,
|
|
||||||
"module name must be a string"
|
|
||||||
);
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/compile-time.t
|
|
||||||
+++ t/compile-time.t
|
|
||||||
@@ -2,8 +2,6 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 1;
|
|
||||||
|
|
||||||
use_ok('CompileTime');
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/edge-cases.t
|
|
||||||
+++ t/edge-cases.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 19;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
@@ -109,5 +109,3 @@ SKIP: {
|
|
||||||
my $stash = Package::Stash->new('HasISA');
|
|
||||||
is_deeply([$stash->list_all_symbols('SCALAR')], []);
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/extension.t
|
|
||||||
+++ t/extension.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 15;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
{
|
|
||||||
@@ -72,5 +72,3 @@ is(exception {
|
|
||||||
}, undef, '... created %Foo::baz successfully');
|
|
||||||
|
|
||||||
ok(!defined($Foo::{baz}), '... the %baz slot has still not been created');
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/get.t
|
|
||||||
+++ t/get.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 36;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
use Scalar::Util;
|
|
||||||
@@ -182,5 +182,3 @@ use Scalar::Util;
|
|
||||||
"stash has the right variable");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/basic-pp.t
|
|
||||||
+++ t/impl-selection/basic-pp.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 133;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
BEGIN { $Package::Stash::IMPLEMENTATION = 'PP' }
|
|
||||||
@@ -448,5 +448,3 @@ like(
|
|
||||||
qr/^Package::Stash->new must be passed the name of the package to access/,
|
|
||||||
"module name must be a string"
|
|
||||||
);
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/basic-xs.t
|
|
||||||
+++ t/impl-selection/basic-xs.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 133;
|
|
||||||
use Test::Fatal;
|
|
||||||
use Test::Requires 'Package::Stash::XS';
|
|
||||||
|
|
||||||
@@ -449,5 +449,3 @@ like(
|
|
||||||
qr/^Package::Stash->new must be passed the name of the package to access/,
|
|
||||||
"module name must be a string"
|
|
||||||
);
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/bug-rt-78272.t
|
|
||||||
+++ t/impl-selection/bug-rt-78272.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 2;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
# https://rt.cpan.org/Public/Bug/Display.html?id=78272
|
|
||||||
@@ -22,18 +22,3 @@ like(
|
|
||||||
'Sanity check: forcing package reload throws the exception again'
|
|
||||||
);
|
|
||||||
|
|
||||||
-is(
|
|
||||||
- exception {
|
|
||||||
- $ENV{PACKAGE_STASH_IMPLEMENTATION} = "PP";
|
|
||||||
- delete $INC{'Package/Stash.pm'};
|
|
||||||
- require Package::Stash;
|
|
||||||
- new_ok(
|
|
||||||
- 'Package::Stash' => ['Foo'],
|
|
||||||
- 'Loaded and able to create instances'
|
|
||||||
- );
|
|
||||||
- },
|
|
||||||
- undef,
|
|
||||||
- 'Valid $ENV value loads correctly'
|
|
||||||
-);
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/choice.t
|
|
||||||
+++ t/impl-selection/choice.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 2;
|
|
||||||
|
|
||||||
my $has_xs = eval "require Package::Stash::XS; 1";
|
|
||||||
|
|
||||||
@@ -13,5 +13,3 @@ my $expected = $has_xs ? 'XS' : 'PP';
|
|
||||||
is($Package::Stash::IMPLEMENTATION, $expected,
|
|
||||||
"autodetected properly: $expected");
|
|
||||||
can_ok('Package::Stash', 'new');
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/env.t
|
|
||||||
+++ t/impl-selection/env.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 6;
|
|
||||||
|
|
||||||
# XXX: work around dumb core segfault bug when you delete stashes
|
|
||||||
sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
|
|
||||||
@@ -35,5 +35,3 @@ SKIP: {
|
|
||||||
is(get_impl, 'PP', '$ENV takes precedence over $Package::Stash::IMPLEMENTATION');
|
|
||||||
can_ok('Package::Stash', 'new');
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/impl-selection/var.t
|
|
||||||
+++ t/impl-selection/var.t
|
|
||||||
@@ -1,7 +1,7 @@
|
|
||||||
#!/usr/bin/env perl
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 4;
|
|
||||||
|
|
||||||
# XXX: work around dumb core segfault bug when you delete stashes
|
|
||||||
sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
|
|
||||||
@@ -25,5 +25,3 @@ SKIP: {
|
|
||||||
is(get_impl, 'XS', "autodetected properly: XS");
|
|
||||||
can_ok('Package::Stash', 'new');
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/io.t
|
|
||||||
+++ t/io.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 11;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
{
|
|
||||||
@@ -47,5 +47,3 @@ use Package::Stash;
|
|
||||||
ok($stash->has_symbol('baz'), "has baz");
|
|
||||||
is($stash->get_symbol('baz'), *Foo::foo{IO}, "got the right baz");
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/isa.t
|
|
||||||
+++ t/isa.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 8;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -19,7 +19,10 @@ use Package::Stash;
|
|
||||||
my $stash = Package::Stash->new('Foo');
|
|
||||||
my @ISA = ('Bar');
|
|
||||||
@{$stash->get_or_add_symbol('@ISA')} = @ISA;
|
|
||||||
+ SKIP: {
|
|
||||||
+ skip "Test::More >= 0.88 needed for isa_ok() tests on classes", 1 if $Test::More::VERSION < 0.88;
|
|
||||||
isa_ok('Foo', 'Bar');
|
|
||||||
+ }
|
|
||||||
isa_ok(bless({}, 'Foo'), 'Bar');
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -33,17 +36,21 @@ use Package::Stash;
|
|
||||||
{
|
|
||||||
my $isa = $stash->get_or_add_symbol('@ISA');
|
|
||||||
@$isa = ('Baz');
|
|
||||||
+ SKIP: {
|
|
||||||
+ skip "Test::More >= 0.88 needed for isa_ok() tests on classes", 1 if $Test::More::VERSION < 0.88;
|
|
||||||
isa_ok('Quux', 'Baz');
|
|
||||||
+ }
|
|
||||||
isa_ok(bless({}, 'Quux'), 'Baz');
|
|
||||||
ok(Quux->can('foo'));
|
|
||||||
}
|
|
||||||
{
|
|
||||||
my $isa = $stash->get_or_add_symbol('@ISA');
|
|
||||||
@$isa = ('Bar');
|
|
||||||
+ SKIP: {
|
|
||||||
+ skip "Test::More >= 0.88 needed for isa_ok() tests on classes", 1 if $Test::More::VERSION < 0.88;
|
|
||||||
isa_ok('Quux', 'Bar');
|
|
||||||
+ }
|
|
||||||
isa_ok(bless({}, 'Quux'), 'Bar');
|
|
||||||
ok(Quux->can('bar'));
|
|
||||||
}
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/magic.t
|
|
||||||
+++ t/magic.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 14;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -77,4 +77,3 @@ SKIP: {
|
|
||||||
is($store, 0, "get_or_add_symbol stores (populated slot)");
|
|
||||||
}
|
|
||||||
|
|
||||||
-done_testing;
|
|
||||||
--- t/paamayim_nekdotayim.t
|
|
||||||
+++ t/paamayim_nekdotayim.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 3;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
@@ -24,5 +24,3 @@ like(
|
|
||||||
qr/^Variable names may not contain ::/,
|
|
||||||
"can't add symbol with ::"
|
|
||||||
);
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/scalar-values.t
|
|
||||||
+++ t/scalar-values.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 14;
|
|
||||||
use Test::Fatal;
|
|
||||||
|
|
||||||
use B;
|
|
||||||
@@ -49,5 +49,3 @@ my $vstring = v1.2.3;
|
|
||||||
is(reftype(\$vstring), ($] < 5.010 ? 'SCALAR' : 'VSTRING'));
|
|
||||||
is(exception { $Bar->add_symbol('$vstring', \$vstring) }, undef,
|
|
||||||
"can add vstring values");
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/stash-deletion.t
|
|
||||||
+++ t/stash-deletion.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 2;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -20,5 +20,3 @@ use Package::Stash;
|
|
||||||
}
|
|
||||||
ok(!$delete->has_symbol('&bar'), "method goes away when stash is deleted");
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/synopsis.t
|
|
||||||
+++ t/synopsis.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 3;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -15,5 +15,3 @@ $stash->add_symbol('%foo', {bar => 1});
|
|
||||||
ok(!$stash->has_symbol('$foo'), "doesn't have anything in scalar slot");
|
|
||||||
my $namespace = $stash->namespace;
|
|
||||||
is_deeply(*{ $namespace->{foo} }{HASH}, {bar => 1}, "namespace works properly");
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- t/warnings-taint.t
|
|
||||||
+++ t/warnings-taint.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 1;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -19,4 +19,3 @@ BEGIN {
|
|
||||||
|
|
||||||
is($warnings, '');
|
|
||||||
|
|
||||||
-done_testing;
|
|
||||||
--- t/warnings.t
|
|
||||||
+++ t/warnings.t
|
|
||||||
@@ -2,7 +2,7 @@
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
use lib 't/lib';
|
|
||||||
-use Test::More;
|
|
||||||
+use Test::More tests => 1;
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
|
|
||||||
@@ -18,5 +18,3 @@ BEGIN {
|
|
||||||
}
|
|
||||||
|
|
||||||
is($warnings, '');
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- xt/author/leaks-debug.t
|
|
||||||
+++ xt/author/leaks-debug.t
|
|
||||||
@@ -6,6 +6,8 @@ use Test::More;
|
|
||||||
use Test::Fatal;
|
|
||||||
use Test::LeakTrace;
|
|
||||||
|
|
||||||
+plan tests => 45;
|
|
||||||
+
|
|
||||||
BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
|
|
||||||
|
|
||||||
use Package::Stash;
|
|
||||||
@@ -176,7 +178,10 @@ use Symbol;
|
|
||||||
ok($foo->has_symbol('@ISA'));
|
|
||||||
is(ref($foo->get_symbol('@ISA')), 'ARRAY');
|
|
||||||
is_deeply($foo->get_symbol('@ISA'), ['Exporter']);
|
|
||||||
+ SKIP: {
|
|
||||||
+ skip "Test::More >= 0.88 needed for isa_ok() tests on classes", 1 if $Test::More::VERSION < 0.88;
|
|
||||||
isa_ok('Foo', 'Exporter');
|
|
||||||
+ }
|
|
||||||
}
|
|
||||||
|
|
||||||
{
|
|
||||||
@@ -226,5 +231,3 @@ use Symbol;
|
|
||||||
eval { $foo->add_symbol('&blorg') };
|
|
||||||
} "doesn't leak on errors";
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- xt/author/leaks.t
|
|
||||||
+++ xt/author/leaks.t
|
|
||||||
@@ -6,6 +6,8 @@ use Test::More;
|
|
||||||
use Test::Fatal;
|
|
||||||
use Test::LeakTrace;
|
|
||||||
|
|
||||||
+plan tests => 45;
|
|
||||||
+
|
|
||||||
use Package::Stash;
|
|
||||||
use Symbol;
|
|
||||||
|
|
||||||
@@ -174,7 +176,10 @@ use Symbol;
|
|
||||||
ok($foo->has_symbol('@ISA'));
|
|
||||||
is(ref($foo->get_symbol('@ISA')), 'ARRAY');
|
|
||||||
is_deeply($foo->get_symbol('@ISA'), ['Exporter']);
|
|
||||||
+ SKIP: {
|
|
||||||
+ skip "Test::More >= 0.88 needed for isa_ok() tests on classes", 1 if $Test::More::VERSION < 0.88;
|
|
||||||
isa_ok('Foo', 'Exporter');
|
|
||||||
+ }
|
|
||||||
}
|
|
||||||
|
|
||||||
{
|
|
||||||
@@ -224,5 +229,3 @@ use Symbol;
|
|
||||||
eval { $foo->add_symbol('&blorg') };
|
|
||||||
} "doesn't leak on errors";
|
|
||||||
}
|
|
||||||
-
|
|
||||||
-done_testing;
|
|
||||||
--- xt/release/no-tabs.t
|
|
||||||
+++ xt/release/no-tabs.t
|
|
||||||
@@ -3,7 +3,7 @@ use warnings;
|
|
||||||
|
|
||||||
# this test was generated with Dist::Zilla::Plugin::Test::NoTabs 0.08
|
|
||||||
|
|
||||||
-use Test::More 0.88;
|
|
||||||
+use Test::More;
|
|
||||||
use Test::NoTabs;
|
|
||||||
|
|
||||||
my @files = (
|
|
||||||
@@ -41,5 +41,6 @@ my @files = (
|
|
||||||
't/warnings.t'
|
|
||||||
);
|
|
||||||
|
|
||||||
+plan tests => scalar @files;
|
|
||||||
+
|
|
||||||
notabs_ok($_) foreach @files;
|
|
||||||
-done_testing;
|
|
@ -1,11 +1,3 @@
|
|||||||
# We need to patch the test suite if we have an old version of Test::More
|
|
||||||
%global old_test_more %(perl -MTest::More -e 'print (($Test::More::VERSION < 0.88) ? 1 : 0);' 2>/dev/null || echo 0)
|
|
||||||
# Run extra test
|
|
||||||
%if ! (0%{?rhel})
|
|
||||||
%bcond_without perl_Package_Stash_enables_extra_test
|
|
||||||
%else
|
|
||||||
%bcond_with perl_Package_Stash_enables_extra_test
|
|
||||||
%endif
|
|
||||||
# Run optional test
|
# Run optional test
|
||||||
%if ! (0%{?rhel})
|
%if ! (0%{?rhel})
|
||||||
%bcond_without perl_Package_Stash_enables_optional_test
|
%bcond_without perl_Package_Stash_enables_optional_test
|
||||||
@ -14,22 +6,27 @@
|
|||||||
%endif
|
%endif
|
||||||
|
|
||||||
Name: perl-Package-Stash
|
Name: perl-Package-Stash
|
||||||
Version: 0.37
|
Version: 0.39
|
||||||
Release: 9%{?dist}
|
Release: 4%{?dist}
|
||||||
Summary: Routines for manipulating stashes
|
Summary: Routines for manipulating stashes
|
||||||
Group: Development/Libraries
|
|
||||||
License: GPL+ or Artistic
|
License: GPL+ or Artistic
|
||||||
URL: http://search.cpan.org/dist/Package-Stash/
|
URL: https://metacpan.org/release/Package-Stash
|
||||||
Source0: http://search.cpan.org/CPAN/authors/id/D/DO/DOY/Package-Stash-%{version}.tar.gz
|
Source0: https://cpan.metacpan.org/modules/by-module/Package/Package-Stash-%{version}.tar.gz
|
||||||
Patch1: Package-Stash-0.37-old-Test::More.patch
|
|
||||||
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(id -nu)
|
|
||||||
BuildArch: noarch
|
BuildArch: noarch
|
||||||
# Module Build
|
# Module Build
|
||||||
BuildRequires: perl-interpreter
|
BuildRequires: coreutils
|
||||||
|
BuildRequires: findutils
|
||||||
|
BuildRequires: make
|
||||||
BuildRequires: perl-generators
|
BuildRequires: perl-generators
|
||||||
|
BuildRequires: perl-interpreter
|
||||||
BuildRequires: perl(Config)
|
BuildRequires: perl(Config)
|
||||||
|
BuildRequires: perl(DynaLoader)
|
||||||
|
BuildRequires: perl(Exporter)
|
||||||
BuildRequires: perl(ExtUtils::MakeMaker)
|
BuildRequires: perl(ExtUtils::MakeMaker)
|
||||||
BuildRequires: perl(File::Spec)
|
BuildRequires: perl(ExtUtils::Mksymlists)
|
||||||
|
BuildRequires: perl(File::Basename)
|
||||||
|
BuildRequires: perl(File::Spec::Functions)
|
||||||
|
BuildRequires: perl(File::Temp)
|
||||||
BuildRequires: perl(Text::ParseWords)
|
BuildRequires: perl(Text::ParseWords)
|
||||||
# Module Runtime
|
# Module Runtime
|
||||||
BuildRequires: perl(B)
|
BuildRequires: perl(B)
|
||||||
@ -45,26 +42,20 @@ BuildRequires: perl(Symbol)
|
|||||||
BuildRequires: perl(warnings)
|
BuildRequires: perl(warnings)
|
||||||
# Test Suite
|
# Test Suite
|
||||||
BuildRequires: perl(base)
|
BuildRequires: perl(base)
|
||||||
BuildRequires: perl(IO::Handle)
|
BuildRequires: perl(CPAN::Meta::Check) >= 0.011
|
||||||
BuildRequires: perl(IPC::Open3)
|
BuildRequires: perl(CPAN::Meta::Requirements)
|
||||||
|
BuildRequires: perl(File::Spec)
|
||||||
BuildRequires: perl(lib)
|
BuildRequires: perl(lib)
|
||||||
BuildRequires: perl(Test::Fatal)
|
BuildRequires: perl(Test::Fatal)
|
||||||
BuildRequires: perl(Test::More)
|
BuildRequires: perl(Test::More) >= 0.88
|
||||||
BuildRequires: perl(Test::Requires)
|
BuildRequires: perl(Test::Needs)
|
||||||
%if %{with perl_Package_Stash_enables_optional_test}
|
%if %{with perl_Package_Stash_enables_optional_test}
|
||||||
# Optional Tests
|
# Optional Tests
|
||||||
|
BuildRequires: perl(CPAN::Meta) >= 2.120900
|
||||||
|
BuildRequires: perl(Module::Runtime::Conflicts)
|
||||||
BuildRequires: perl(Package::Anon)
|
BuildRequires: perl(Package::Anon)
|
||||||
BuildRequires: perl(Variable::Magic)
|
BuildRequires: perl(Variable::Magic)
|
||||||
%endif
|
%endif
|
||||||
%if %{with perl_Package_Stash_enables_extra_test}
|
|
||||||
# Extra Tests
|
|
||||||
BuildRequires: perl(Pod::Coverage::TrustPod)
|
|
||||||
BuildRequires: perl(Test::EOL)
|
|
||||||
BuildRequires: perl(Test::LeakTrace)
|
|
||||||
BuildRequires: perl(Test::NoTabs)
|
|
||||||
BuildRequires: perl(Test::Pod) >= 1.41
|
|
||||||
BuildRequires: perl(Test::Pod::Coverage) >= 1.08
|
|
||||||
%endif
|
|
||||||
# Runtime
|
# Runtime
|
||||||
Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
|
Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
|
||||||
# For performance and consistency
|
# For performance and consistency
|
||||||
@ -80,30 +71,17 @@ a simple API.
|
|||||||
%prep
|
%prep
|
||||||
%setup -q -n Package-Stash-%{version}
|
%setup -q -n Package-Stash-%{version}
|
||||||
|
|
||||||
# Compatibility with old Test::More versions
|
|
||||||
%if %{old_test_more}
|
|
||||||
%patch1
|
|
||||||
%endif
|
|
||||||
|
|
||||||
%build
|
%build
|
||||||
perl Makefile.PL INSTALLDIRS=vendor
|
perl Makefile.PL INSTALLDIRS=vendor
|
||||||
make %{?_smp_mflags}
|
make %{?_smp_mflags}
|
||||||
|
|
||||||
%install
|
%install
|
||||||
rm -rf %{buildroot}
|
|
||||||
make pure_install DESTDIR=%{buildroot}
|
make pure_install DESTDIR=%{buildroot}
|
||||||
find %{buildroot} -type f -name .packlist -exec rm -f {} \;
|
find %{buildroot} -type f -name .packlist -delete
|
||||||
%{_fixperms} %{buildroot}
|
%{_fixperms} -c %{buildroot}
|
||||||
|
|
||||||
%check
|
%check
|
||||||
make test
|
make test
|
||||||
# Extra Tests: Pod Coverage test fails due to lack of POD for Package::Stash::Conflicts
|
|
||||||
%if %{with perl_Package_Stash_enables_extra_test}
|
|
||||||
make test TEST_FILES="$(echo $(find xt/ -name '*.t' | grep -v pod-coverage))"
|
|
||||||
%endif
|
|
||||||
|
|
||||||
%clean
|
|
||||||
rm -rf %{buildroot}
|
|
||||||
|
|
||||||
%files
|
%files
|
||||||
%if 0%{?_licensedir:1}
|
%if 0%{?_licensedir:1}
|
||||||
@ -111,14 +89,68 @@ rm -rf %{buildroot}
|
|||||||
%else
|
%else
|
||||||
%doc LICENSE
|
%doc LICENSE
|
||||||
%endif
|
%endif
|
||||||
%doc Changes README
|
%doc Changes CONTRIBUTING README
|
||||||
%{_bindir}/package-stash-conflicts
|
%{_bindir}/package-stash-conflicts
|
||||||
%{perl_vendorlib}/Package/
|
%{perl_vendorlib}/Package/
|
||||||
%{_mandir}/man1/package-stash-conflicts.1*
|
%{_mandir}/man3/Package::Stash.3*
|
||||||
%{_mandir}/man3/Package::Stash.3pm*
|
%{_mandir}/man3/Package::Stash::PP.3*
|
||||||
%{_mandir}/man3/Package::Stash::PP.3pm*
|
|
||||||
|
|
||||||
%changelog
|
%changelog
|
||||||
|
* Mon Aug 09 2021 Mohan Boddu <mboddu@redhat.com> - 0.39-4
|
||||||
|
- Rebuilt for IMA sigs, glibc 2.34, aarch64 flags
|
||||||
|
Related: rhbz#1991688
|
||||||
|
|
||||||
|
* Fri Apr 16 2021 Mohan Boddu <mboddu@redhat.com> - 0.39-3
|
||||||
|
- Rebuilt for RHEL 9 BETA on Apr 15th 2021. Related: rhbz#1947937
|
||||||
|
|
||||||
|
* Wed Jan 27 2021 Fedora Release Engineering <releng@fedoraproject.org> - 0.39-2
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild
|
||||||
|
|
||||||
|
* Sun Nov 22 2020 Paul Howarth <paul@city-fan.org> - 0.39-1
|
||||||
|
- Update to 0.39
|
||||||
|
- Updated distribution metadata and packaging
|
||||||
|
- Configuration phase now uses ExtUtils::HasCompiler
|
||||||
|
|
||||||
|
* Tue Jul 28 2020 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-8
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild
|
||||||
|
|
||||||
|
* Tue Jun 23 2020 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-7
|
||||||
|
- Perl 5.32 rebuild
|
||||||
|
|
||||||
|
* Tue Mar 10 2020 Paul Howarth <paul@city-fan.org> - 0.38-6
|
||||||
|
- BR: perl(blib) for t/00-compile.t
|
||||||
|
|
||||||
|
* Thu Jan 30 2020 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-5
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild
|
||||||
|
|
||||||
|
* Fri Jul 26 2019 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-4
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild
|
||||||
|
|
||||||
|
* Fri May 31 2019 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-3
|
||||||
|
- Perl 5.30 rebuild
|
||||||
|
|
||||||
|
* Fri Feb 01 2019 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-2
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild
|
||||||
|
|
||||||
|
* Wed Jan 2 2019 Paul Howarth <paul@city-fan.org> - 0.38-1
|
||||||
|
- Update to 0.38
|
||||||
|
- Avoid new warning in 5.21.x regarding too many arguments for printf/sprintf
|
||||||
|
- Canonical repository moved to https://github.com/moose/Package-Stash
|
||||||
|
- Package new CONTRIBUTING file
|
||||||
|
- Specify all build dependencies
|
||||||
|
- Don't bother running the extra tests
|
||||||
|
- Simplify find command using -delete
|
||||||
|
- Drop EL-5 support
|
||||||
|
- Drop legacy Group: tag
|
||||||
|
- Drop explicit buildroot cleaning in %%install section
|
||||||
|
- Drop workaround for building with Test::More < 0.88
|
||||||
|
|
||||||
|
* Fri Jul 13 2018 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-11
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild
|
||||||
|
|
||||||
|
* Thu Jun 28 2018 Jitka Plesnikova <jplesnik@redhat.com> - 0.37-10
|
||||||
|
- Perl 5.28 rebuild
|
||||||
|
|
||||||
* Thu Feb 08 2018 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-9
|
* Thu Feb 08 2018 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-9
|
||||||
- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild
|
||||||
|
|
||||||
|
2
sources
2
sources
@ -1 +1 @@
|
|||||||
SHA512 (Package-Stash-0.37.tar.gz) = d10321903591568d4ac4db91ad9e4dfcffe564ab22a5ecdd8fa103749c9708da082ffb3ca478e98ac120a23e51c0ab0ccf799c0da10fe2be194e9cace1f16b06
|
SHA512 (Package-Stash-0.39.tar.gz) = c5a6cd56c86fb9f6c8585ee7f65d0add8e905c586747763c7841a054f3540b6bc505f57952f44bb90a6bb500d0d60d20ad5df7a40944480abbc9d8d43d64e30f
|
||||||
|
Loading…
Reference in New Issue
Block a user