49907b0a28
- New upstream release 0.24
- Properly skip debugger test when optional deps not available
- Make sure pure-perl tests pass correctly on space-containing paths
(CPAN RT#77528)
- Remove all the pure-perl fallback code and depend on PP-capable
B::H::EOS 0.12
- Module no longer attempts to use Hash::Util::FieldHash, so drop filters
- BR: perl(Sub::Identify) and perl(Sub::Name) unconditionally
- BR: perl(base), perl(ExtUtils::CBuilder) and perl(lib)
- Drop BR: perl(FindBin), not dual-lived upstream
- Update patch for building with old Test::More versions
73 lines
1.8 KiB
Diff
73 lines
1.8 KiB
Diff
diff -up ./t/07-debugger.t.orig ./t/07-debugger.t
|
|
--- ./t/07-debugger.t.orig 2012-11-26 18:47:12.000000000 +0000
|
|
+++ ./t/07-debugger.t 2012-12-05 15:16:36.658012218 +0000
|
|
@@ -26,6 +26,8 @@ BEGIN {
|
|
|
|
}
|
|
|
|
+plan tests => 4;
|
|
+
|
|
{
|
|
package Foo;
|
|
|
|
@@ -44,5 +46,3 @@ ok( !Foo->can("foo"), "foo cleaned up" )
|
|
ok( !Foo->can("baz"), "baz cleaned up" );
|
|
|
|
Foo->bar();
|
|
-
|
|
-done_testing;
|
|
diff -up ./t/08-const-sub.t.orig ./t/08-const-sub.t
|
|
--- ./t/08-const-sub.t.orig 2011-03-29 22:44:20.000000000 +0100
|
|
+++ ./t/08-const-sub.t 2012-12-05 15:16:36.670012221 +0000
|
|
@@ -1,7 +1,7 @@
|
|
use strict;
|
|
use warnings;
|
|
|
|
-use Test::More 0.88;
|
|
+use Test::More tests => 2;
|
|
|
|
use constant CONST => 123;
|
|
use namespace::clean;
|
|
@@ -10,5 +10,3 @@ my $x = CONST;
|
|
is $x, 123;
|
|
|
|
ok eval("!defined(&CONST)");
|
|
-
|
|
-done_testing;
|
|
diff -up ./t/09-fiddle-hinthash.t.orig ./t/09-fiddle-hinthash.t
|
|
--- ./t/09-fiddle-hinthash.t.orig 2011-12-22 11:07:06.000000000 +0000
|
|
+++ ./t/09-fiddle-hinthash.t 2012-12-05 15:16:36.671012222 +0000
|
|
@@ -1,7 +1,7 @@
|
|
use strict;
|
|
use warnings;
|
|
|
|
-use Test::More 0.88;
|
|
+use Test::More tests => 4;
|
|
|
|
{
|
|
package Bar;
|
|
@@ -49,5 +49,3 @@ use Test::More 0.88;
|
|
}
|
|
}
|
|
|
|
-
|
|
-done_testing;
|
|
diff -up ./t/10-pure-perl.t.orig ./t/10-pure-perl.t
|
|
--- ./t/10-pure-perl.t.orig 2012-11-26 18:47:12.000000000 +0000
|
|
+++ ./t/10-pure-perl.t 2012-12-05 15:17:25.973028700 +0000
|
|
@@ -8,6 +8,8 @@ plan skip_all => "PP tests already execu
|
|
eval { require Variable::Magic }
|
|
or plan skip_all => "PP tests already executed";
|
|
|
|
+plan tests => 12;
|
|
+
|
|
$ENV{B_HOOKS_ENDOFSCOPE_IMPLEMENTATION} = 'PP';
|
|
require B::Hooks::EndOfScope;
|
|
ok( ($INC{'B/Hooks/EndOfScope/PP.pm'} && ! $INC{'B/Hooks/EndOfScope/XS.pm'}),
|
|
@@ -42,5 +44,3 @@ for my $fn (bsd_glob("$Bin/*.t")) {
|
|
wait;
|
|
ok (! $?, "Exit $? from: @cmd");
|
|
}
|
|
-
|
|
-done_testing;
|