File Package-Stash-0.13-Build_n_Test.patch of Package perl-Package-Stash
diff -ruN Package-Stash-0.13-orig/t/01-basic.t Package-Stash-0.13/t/01-basic.t
--- Package-Stash-0.13-orig/t/01-basic.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/01-basic.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Test::Fatal;
use Package::Stash;
@@ -324,4 +324,4 @@
}
}
-done_testing;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/02-extension.t Package-Stash-0.13/t/02-extension.t
--- Package-Stash-0.13-orig/t/02-extension.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/02-extension.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Test::Fatal;
{
@@ -70,4 +70,4 @@
ok(!defined($Foo::{baz}), '... the %baz slot has still not been created');
-done_testing;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/03-io.t Package-Stash-0.13/t/03-io.t
--- Package-Stash-0.13-orig/t/03-io.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/03-io.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Test::Fatal;
{
@@ -47,4 +47,4 @@
is($stash->get_package_symbol('baz'), *Foo::foo{IO}, "got the right baz");
}
-done_testing;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/04-get.t Package-Stash-0.13/t/04-get.t
--- Package-Stash-0.13-orig/t/04-get.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/04-get.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Package::Stash;
@@ -63,4 +63,4 @@
"got the right variable");
}
-done_testing;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/05-isa.t Package-Stash-0.13/t/05-isa.t
--- Package-Stash-0.13-orig/t/05-isa.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/05-isa.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Package::Stash;
@@ -18,4 +18,4 @@
@{$stash->get_package_symbol('@ISA')} = @ISA;
isa_ok('Foo', 'Bar');
-done_testing;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/06-addsub.t Package-Stash-0.13/t/06-addsub.t
--- Package-Stash-0.13-orig/t/06-addsub.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/06-addsub.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Test::Fatal;
BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
@@ -42,4 +42,4 @@
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;
+#done_testing;
diff -ruN Package-Stash-0.13-orig/t/10-synopsis.t Package-Stash-0.13/t/10-synopsis.t
--- Package-Stash-0.13-orig/t/10-synopsis.t 2010-10-31 17:03:48.000000000 +0100
+++ Package-Stash-0.13/t/10-synopsis.t 2010-11-11 22:40:40.000000000 +0100
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More;
+use Test::More qw(no_plan);
use Package::Stash;
@@ -15,4 +15,4 @@
my $namespace = $stash->namespace;
is_deeply(*{ $namespace->{foo} }{HASH}, {bar => 1}, "namespace works properly");
-done_testing;
+#done_testing;