ppisar pushed to perl-Debug-Client (master). "Adjust to perl-5.22"

[notifications at fedoraproject.org]

From 764c94792561ab9877ee95b65496147c014c5216 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar at redhat.com>
Date: Wed, 17 Jun 2015 16:12:04 +0200
Subject: Adjust to perl-5.22


diff --git a/Debug-Client-0.29-Debugger-y-command-start-with-0-again-since-perl-5.2.patch b/Debug-Client-0.29-Debugger-y-command-start-with-0-again-since-perl-5.2.patch
new file mode 100644
index 0000000..2db2d24
--- /dev/null
+++ b/Debug-Client-0.29-Debugger-y-command-start-with-0-again-since-perl-5.2.patch
@@ -0,0 +1,49 @@
+From d18971088b24ecdfb0cc4ea6aa78065d312710c2 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar at redhat.com>
+Date: Wed, 17 Jun 2015 16:06:50 +0200
+Subject: [PATCH] Debugger y-command start with 0 again since perl-5.21.3
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+Perl fixed the y-command regression regarding the scope level. See
+perl commit:
+
+commit 496f5ba57a43840a3c8ee61b21dc60d0c8bb5d52
+Author: Tony Cook <tony at develop-help.com>
+Date:   Fri Aug 15 10:45:57 2014 +1000
+
+    fix debugger y command scope level
+
+    5c2b78e73d3 moved handling of the y command into its own function,
+    but did not adjust the provided scope level to account for the extra
+    scope.
+
+This caused failling Debug-Client tests with perl-5.22 because
+Debug::Client implemented a work-around for the regression.
+
+This patch limits the work-around from top too.
+
+<https://github.com/PadreIDE/Debug-Client/issues/2>
+
+Signed-off-by: Petr Písař <ppisar at redhat.com>
+---
+ lib/Debug/Client.pm | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/lib/Debug/Client.pm b/lib/Debug/Client.pm
+index eee355f..5c9dd6a 100644
+--- a/lib/Debug/Client.pm
++++ b/lib/Debug/Client.pm
+@@ -341,7 +341,7 @@ sub get_y_zero {
+ 	require PadWalker if 0; #forces PadWalker to be a requires not a test_requires
+ 
+ 	# say 'running on perl '. $PERL_VERSION;
+-	if ( $PERL_VERSION >= 5.017006 ) {
++	if ( $PERL_VERSION >= 5.017006 && $PERL_VERSION <= 5.021003 ) {
+ 
+ 		# say 'using y=1 instead as running on perl ' . $PERL_VERSION;
+ 		$self->_send('y 1');
+-- 
+2.1.0
+
diff --git a/perl-Debug-Client.spec b/perl-Debug-Client.spec
index 7f111eb..d3c3893 100644
--- a/perl-Debug-Client.spec
+++ b/perl-Debug-Client.spec
@@ -1,11 +1,14 @@
 Name:           perl-Debug-Client
 Version:        0.29
-Release:        4%{?dist}
+Release:        5%{?dist}
 Summary:        Client side code for perl debugger
 License:        GPL+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/Debug-Client/
 Source0:        http://search.cpan.org/CPAN/authors/id/B/BO/BOWTIE/Debug-Client-%{version}.tar.gz
+# Adjust to perl-5.22, bug #1231216,
+# <https://github.com/PadreIDE/Debug-Client/issues/2>
+Patch0:         Debug-Client-0.29-Debugger-y-command-start-with-0-again-since-perl-5.2.patch
 BuildArch:      noarch
 BuildRequires:  perl
 BuildRequires:  perl(inc::Module::Install) >= 1.06
@@ -51,6 +54,7 @@ Client side module for debugging. This module is part of padre's debugger.
 
 %prep
 %setup -q -n Debug-Client-%{version}
+%patch0 -p1
 # Removed bundled EE::MM
 rm -r inc
 sed -i -e '/^inc\//d' MANIFEST
@@ -73,6 +77,9 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Wed Jun 17 2015 Petr Pisar <ppisar at redhat.com> - 0.29-5
+- Adjust to perl-5.22 (bug #1231216)
+
 * Sat Jun 06 2015 Jitka Plesnikova <jplesnik at redhat.com> - 0.29-4
 - Perl 5.22 rebuild
 
-- 
cgit v0.10.2


	http://pkgs.fedoraproject.org/cgit/perl-Debug-Client.git/commit/?h=master&id=764c94792561ab9877ee95b65496147c014c5216