Accepting request 108539 from devel:languages:perl

Automatic submission by obs-autosubmit

OBS-URL: https://build.opensuse.org/request/show/108539
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-Package-Stash?expand=0&rev=12

perl-Package-Stash-old_Test-More.patch

@@ -1,102 +1,16 @@
-Index: Package-Stash-0.29/t/01-basic.t
-===================================================================
---- Package-Stash-0.29.orig/t/01-basic.t
-+++ Package-Stash-0.29/t/01-basic.t
-@@ -2,7 +2,7 @@
+--- Package-Stash-0.33/t/00-compile.t
++++ Package-Stash-0.33/t/00-compile.t
+@@ -3,7 +3,7 @@
  use strict;
  use warnings;
- use lib 't/lib';
--use Test::More;
-+use Test::More qw(no_plan);
- use Test::Fatal;
  
- use Package::Stash;
-@@ -417,4 +417,4 @@ like(exception {
-     );
- }
- 
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/02-extension.t
-===================================================================
---- Package-Stash-0.29.orig/t/02-extension.t
-+++ Package-Stash-0.29/t/02-extension.t
-@@ -2,7 +2,7 @@
- use strict;
- use warnings;
- use lib 't/lib';
--use Test::More;
-+use Test::More qw(no_plan);
- use Test::Fatal;
- 
- {
-@@ -73,4 +73,4 @@ is(exception {
- 
- ok(!defined($Foo::{baz}), '... the %baz slot has still not been created');
- 
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/03-io.t
-===================================================================
---- Package-Stash-0.29.orig/t/03-io.t
-+++ Package-Stash-0.29/t/03-io.t
-@@ -2,7 +2,7 @@
- use strict;
- use warnings;
- use lib 't/lib';
--use Test::More;
-+use Test::More qw(no_plan);
- use Test::Fatal;
- 
- {
-@@ -48,4 +48,4 @@ use Package::Stash;
-     is($stash->get_symbol('baz'), *Foo::foo{IO}, "got the right baz");
- }
- 
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/04-get.t
-===================================================================
---- Package-Stash-0.29.orig/t/04-get.t
-+++ Package-Stash-0.29/t/04-get.t
-@@ -2,7 +2,7 @@
- use strict;
- use warnings;
- use lib 't/lib';
 -use Test::More;
 +use Test::More qw(no_plan);
  
- use Package::Stash;
- use Scalar::Util;
-@@ -183,4 +183,4 @@ use Scalar::Util;
-     }
- }
  
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/05-isa.t
-===================================================================
---- Package-Stash-0.29.orig/t/05-isa.t
-+++ Package-Stash-0.29/t/05-isa.t
-@@ -2,7 +2,7 @@
- use strict;
- use warnings;
- use lib 't/lib';
--use Test::More;
-+use Test::More qw(no_plan);
  
- use Package::Stash;
- 
-@@ -19,4 +19,4 @@ my @ISA = ('Bar');
- @{$stash->get_or_add_symbol('@ISA')} = @ISA;
- isa_ok('Foo', 'Bar');
- 
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/06-addsub.t
-===================================================================
---- Package-Stash-0.29.orig/t/06-addsub.t
-+++ Package-Stash-0.29/t/06-addsub.t
+--- Package-Stash-0.33/t/addsub.t
++++ Package-Stash-0.33/t/addsub.t
 @@ -2,7 +2,7 @@
  use strict;
  use warnings;
@@ -106,16 +20,48 @@ Index: Package-Stash-0.29/t/06-addsub.t
  use Test::Fatal;
  
  BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
-@@ -43,4 +43,4 @@ $foo_stash->add_symbol(
+@@ -43,4 +43,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;
-Index: Package-Stash-0.29/t/07-edge-cases.t
-===================================================================
---- Package-Stash-0.29.orig/t/07-edge-cases.t
-+++ Package-Stash-0.29/t/07-edge-cases.t
+--- Package-Stash-0.33/t/author-leaks-debug.t
++++ Package-Stash-0.33/t/author-leaks-debug.t
+@@ -10,7 +10,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ use Test::LeakTrace;
+ 
+@@ -209,4 +209,4 @@
+     } "doesn't leak on errors";
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/author-leaks.t
++++ Package-Stash-0.33/t/author-leaks.t
+@@ -10,7 +10,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ use Test::LeakTrace;
+ 
+@@ -207,4 +207,4 @@
+     } "doesn't leak on errors";
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/basic.t
++++ Package-Stash-0.33/t/basic.t
 @@ -2,7 +2,7 @@
  use strict;
  use warnings;
@@ -125,92 +71,78 @@ Index: Package-Stash-0.29/t/07-edge-cases.t
  use Test::Fatal;
  
  use Package::Stash;
-@@ -81,4 +81,4 @@ use_ok('CompileTime');
-     ok(!$delete->has_symbol('&bar'), "method goes away when stash is deleted");
- }
+@@ -437,4 +437,4 @@
+     "module name must be a string"
+ );
  
 -done_testing;
 +#done_testing;
-Index: Package-Stash-0.29/t/10-synopsis.t
-===================================================================
---- Package-Stash-0.29.orig/t/10-synopsis.t
-+++ Package-Stash-0.29/t/10-synopsis.t
-@@ -2,7 +2,7 @@
+--- Package-Stash-0.33/t/compile-time.t
++++ Package-Stash-0.33/t/compile-time.t
+@@ -2,8 +2,8 @@
  use strict;
  use warnings;
  use lib 't/lib';
 -use Test::More;
 +use Test::More qw(no_plan);
  
+ use_ok('CompileTime');
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/edge-cases.t
++++ Package-Stash-0.33/t/edge-cases.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ 
  use Package::Stash;
- 
-@@ -16,4 +16,4 @@ ok(!$stash->has_symbol('$foo'), "doesn't
- my $namespace = $stash->namespace;
- is_deeply(*{ $namespace->{foo} }{HASH}, {bar => 1}, "namespace works properly");
+@@ -53,4 +53,4 @@
+ is(ref($stash->get_symbol('$glob')), '', "nothing yet");
+ is(ref($stash->get_or_add_symbol('$glob')), 'SCALAR', "got an empty scalar");
  
 -done_testing;
 +#done_testing;
-Index: Package-Stash-0.29/t/impl-selection/01-choice.t
-===================================================================
---- Package-Stash-0.29.orig/t/impl-selection/01-choice.t
-+++ Package-Stash-0.29/t/impl-selection/01-choice.t
-@@ -1,7 +1,7 @@
- #!/usr/bin/env perl
+--- Package-Stash-0.33/t/extension.t
++++ Package-Stash-0.33/t/extension.t
+@@ -2,7 +2,7 @@
  use strict;
  use warnings;
+ use lib 't/lib';
 -use Test::More;
 +use Test::More qw(no_plan);
+ use Test::Fatal;
  
- my $has_xs = eval "require Package::Stash::XS; 1";
+ {
+@@ -73,4 +73,4 @@
  
-@@ -14,4 +14,4 @@ is($Package::Stash::IMPLEMENTATION, $exp
-    "autodetected properly: $expected");
- can_ok('Package::Stash', 'new');
+ ok(!defined($Foo::{baz}), '... the %baz slot has still not been created');
  
 -done_testing;
 +#done_testing;
-Index: Package-Stash-0.29/t/impl-selection/02-env.t
-===================================================================
---- Package-Stash-0.29.orig/t/impl-selection/02-env.t
-+++ Package-Stash-0.29/t/impl-selection/02-env.t
-@@ -1,7 +1,7 @@
- #!/usr/bin/env perl
+--- Package-Stash-0.33/t/get.t
++++ Package-Stash-0.33/t/get.t
+@@ -2,7 +2,7 @@
  use strict;
  use warnings;
+ use lib 't/lib';
 -use Test::More;
-+use Test::More qw(no_plan);
++use Test::More  qw(no_plan);
  
- # XXX: work around dumb core segfault bug when you delete stashes
- sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
-@@ -26,4 +26,4 @@ SKIP: {
-     can_ok('Package::Stash', 'new');
+ use Package::Stash;
+ use Scalar::Util;
+@@ -183,4 +183,4 @@
+     }
  }
  
 -done_testing;
 +#done_testing;
-Index: Package-Stash-0.29/t/impl-selection/03-var.t
-===================================================================
---- Package-Stash-0.29.orig/t/impl-selection/03-var.t
-+++ Package-Stash-0.29/t/impl-selection/03-var.t
-@@ -1,7 +1,7 @@
- #!/usr/bin/env perl
- use strict;
- use warnings;
--use Test::More;
-+use Test::More qw(no_plan);
- 
- # XXX: work around dumb core segfault bug when you delete stashes
- sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
-@@ -26,4 +26,4 @@ SKIP: {
-     can_ok('Package::Stash', 'new');
- }
- 
--done_testing;
-+#done_testing;
-Index: Package-Stash-0.29/t/impl-selection/10-basic-pp.t
-===================================================================
---- Package-Stash-0.29.orig/t/impl-selection/10-basic-pp.t
-+++ Package-Stash-0.29/t/impl-selection/10-basic-pp.t
+--- Package-Stash-0.33/t/impl-selection/basic-pp.t
++++ Package-Stash-0.33/t/impl-selection/basic-pp.t
 @@ -1,7 +1,7 @@
  #!/usr/bin/env perl
  use strict;
@@ -220,16 +152,14 @@ Index: Package-Stash-0.29/t/impl-selection/10-basic-pp.t
  use Test::Fatal;
  
  BEGIN { $Package::Stash::IMPLEMENTATION = 'PP' }
-@@ -421,4 +421,4 @@ like(exception {
+@@ -421,4 +421,4 @@
      );
  }
  
 -done_testing;
 +#done_testing;
-Index: Package-Stash-0.29/t/impl-selection/11-basic-xs.t
-===================================================================
---- Package-Stash-0.29.orig/t/impl-selection/11-basic-xs.t
-+++ Package-Stash-0.29/t/impl-selection/11-basic-xs.t
+--- Package-Stash-0.33/t/impl-selection/basic-xs.t
++++ Package-Stash-0.33/t/impl-selection/basic-xs.t
 @@ -1,7 +1,7 @@
  #!/usr/bin/env perl
  use strict;
@@ -239,9 +169,206 @@ Index: Package-Stash-0.29/t/impl-selection/11-basic-xs.t
  use Test::Fatal;
  use Test::Requires 'Package::Stash::XS';
  
-@@ -422,4 +422,4 @@ like(exception {
+@@ -422,4 +422,4 @@
      );
  }
  
 -done_testing;
 +#done_testing;
+--- Package-Stash-0.33/t/impl-selection/choice.t
++++ Package-Stash-0.33/t/impl-selection/choice.t
+@@ -1,7 +1,7 @@
+ #!/usr/bin/env perl
+ use strict;
+ use warnings;
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ my $has_xs = eval "require Package::Stash::XS; 1";
+ 
+@@ -14,4 +14,4 @@
+    "autodetected properly: $expected");
+ can_ok('Package::Stash', 'new');
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/impl-selection/env.t
++++ Package-Stash-0.33/t/impl-selection/env.t
+@@ -1,7 +1,7 @@
+ #!/usr/bin/env perl
+ use strict;
+ use warnings;
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ # XXX: work around dumb core segfault bug when you delete stashes
+ sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
+@@ -26,4 +26,4 @@
+     can_ok('Package::Stash', 'new');
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/impl-selection/var.t
++++ Package-Stash-0.33/t/impl-selection/var.t
+@@ -1,7 +1,7 @@
+ #!/usr/bin/env perl
+ use strict;
+ use warnings;
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ # XXX: work around dumb core segfault bug when you delete stashes
+ sub get_impl { eval '$Package::Stash::IMPLEMENTATION' }
+@@ -26,4 +26,4 @@
+     can_ok('Package::Stash', 'new');
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/io.t
++++ Package-Stash-0.33/t/io.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ 
+ {
+@@ -48,4 +48,4 @@
+     is($stash->get_symbol('baz'), *Foo::foo{IO}, "got the right baz");
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/isa.t
++++ Package-Stash-0.33/t/isa.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ use Package::Stash;
+ 
+@@ -19,4 +19,4 @@
+ @{$stash->get_or_add_symbol('@ISA')} = @ISA;
+ isa_ok('Foo', 'Bar');
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/paamayim_nekdotayim.t
++++ Package-Stash-0.33/t/paamayim_nekdotayim.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ 
+ use Package::Stash;
+@@ -25,4 +25,4 @@
+     "can't add symbol with ::"
+ );
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/release-eol.t
++++ Package-Stash-0.33/t/release-eol.t
+@@ -8,7 +8,7 @@
+ 
+ use strict;
+ use warnings;
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ eval 'use Test::EOL';
+ plan skip_all => 'Test::EOL required' if $@;
+--- Package-Stash-0.33/t/release-no-tabs.t
++++ Package-Stash-0.33/t/release-no-tabs.t
+@@ -8,7 +8,7 @@
+ 
+ use strict;
+ use warnings;
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ eval 'use Test::NoTabs';
+ plan skip_all => 'Test::NoTabs required' if $@;
+--- Package-Stash-0.33/t/release-pod-coverage.t
++++ Package-Stash-0.33/t/release-pod-coverage.t
+@@ -8,7 +8,7 @@
+ }
+ 
+ 
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ eval "use Test::Pod::Coverage 1.08";
+ plan skip_all => "Test::Pod::Coverage 1.08 required for testing POD coverage"
+--- Package-Stash-0.33/t/release-pod-syntax.t
++++ Package-Stash-0.33/t/release-pod-syntax.t
+@@ -7,7 +7,7 @@
+   }
+ }
+ 
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ eval "use Test::Pod 1.41";
+ plan skip_all => "Test::Pod 1.41 required for testing POD" if $@;
+--- Package-Stash-0.33/t/scalar-values.t
++++ Package-Stash-0.33/t/scalar-values.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ use Test::Fatal;
+ 
+ use B;
+@@ -50,4 +50,4 @@
+ is(exception { $Bar->add_symbol('$vstring', \$vstring) }, undef,
+    "can add vstring values");
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/stash-deletion.t
++++ Package-Stash-0.33/t/stash-deletion.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ use Package::Stash;
+ 
+@@ -21,4 +21,4 @@
+     ok(!$delete->has_symbol('&bar'), "method goes away when stash is deleted");
+ }
+ 
+-done_testing;
++#done_testing;
+--- Package-Stash-0.33/t/synopsis.t
++++ Package-Stash-0.33/t/synopsis.t
+@@ -2,7 +2,7 @@
+ use strict;
+ use warnings;
+ use lib 't/lib';
+-use Test::More;
++use Test::More qw(no_plan);
+ 
+ use Package::Stash;
+ 
+@@ -16,4 +16,4 @@
+ my $namespace = $stash->namespace;
+ is_deeply(*{ $namespace->{foo} }{HASH}, {bar => 1}, "namespace works properly");
+ 
+-done_testing;
++#done_testing;

perl-Package-Stash.changes

@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Wed Feb 29 18:00:14 CET 2012 - ro@suse.de
+
+- updated perl-Package-Stash-old_Test-More.patch 
+
 -------------------------------------------------------------------
 Wed Oct 26 17:26:52 UTC 2011 - tabraham@novell.com
 

perl-Package-Stash.spec

@@ -1,7 +1,7 @@
 #
 # spec file for package perl-Package-Stash
 #
-# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -16,15 +16,14 @@
 #
 
 
-
 Name:           perl-Package-Stash
 Version:        0.33
-Release:        1
-License:        GPL-1.0+ or Artistic-1.0
+Release:        0
 %define cpan_name Package-Stash
 Summary:        routines for manipulating stashes
-Url:            http://search.cpan.org/dist/Package-Stash/
+License:        GPL-1.0+ or Artistic-1.0
 Group:          Development/Libraries/Perl
+Url:            http://search.cpan.org/dist/Package-Stash/
 Source:         http://www.cpan.org/authors/id/D/DO/DOY/%{cpan_name}-%{version}.tar.gz
 Patch1:         perl-Package-Stash-old_Test-More.patch
 BuildArch:      noarch
@@ -87,7 +86,8 @@ implementation if possible, falling back to the pure perl one.
 find . -type f -print0 | xargs -0 chmod 644
 %if 0%{?suse_version} <= 1110
 %patch1 -p1
-rm t/05-isa.t
+rm -f t/00-compile.t
+rm -f t/isa.t
 %endif
 
 %build