Hello community,

here is the log from the commit of package perl-B-Utils for openSUSE:Factory 
checked in at 2014-03-06 12:02:04
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-B-Utils (Old)
 and      /work/SRC/openSUSE:Factory/.perl-B-Utils.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-B-Utils"

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-B-Utils/perl-B-Utils.changes        
2012-06-01 18:53:39.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-B-Utils.new/perl-B-Utils.changes   
2014-03-06 12:02:05.000000000 +0100
@@ -1,0 +2,6 @@
+Mon Mar  3 11:12:23 UTC 2014 - [email protected]
+
+- parent-impl.patch: Allow negative numbers when finding parent (from
+  https://github.com/jbenjore/B-Utils/pull/9)
+
+-------------------------------------------------------------------

New:
----
  parent-impl.patch

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-B-Utils.spec ++++++
--- /var/tmp/diff_new_pack.J8uQLY/_old  2014-03-06 12:02:09.000000000 +0100
+++ /var/tmp/diff_new_pack.J8uQLY/_new  2014-03-06 12:02:09.000000000 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-B-Utils
 #
-# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2014 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
@@ -25,6 +25,7 @@
 Group:          Development/Libraries/Perl
 Url:            http://search.cpan.org/dist/B-Utils/
 Source:         
http://www.cpan.org/authors/id/J/JJ/JJORE/%{cpan_name}-%{version}.tar.gz
+Patch:          parent-impl.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 BuildRequires:  perl
 BuildRequires:  perl-macros
@@ -40,6 +41,7 @@
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
+%patch -p1
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"

++++++ parent-impl.patch ++++++
Index: B-Utils-0.21/lib/B/Utils.pm
===================================================================
--- B-Utils-0.21.orig/lib/B/Utils.pm
+++ B-Utils-0.21/lib/B/Utils.pm
@@ -210,7 +210,7 @@ sub B::OP::_parent_impl {
     return (
         $op->sibling->_parent_impl( $target, "$cx$$op S " )
             || (
-              $cx =~ /^(?:\d+ S )*(?:\d+ N )*$/
+              $cx =~ /^(?:-?\d+ S )*(?:-?\d+ N )*$/
             ? $op->next->_parent_impl( $target, "$cx$$op N " )
             : ()
             )
-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to