dev-perl/DB_File-Lock: Fix test failure on perl >5.20

Package-Manager: portage-2.3.2

diff --git a/dev-perl/DB_File-Lock/DB_File-Lock-0.50.0-r1.ebuild b/dev-perl/DB_File-Lock/DB_File-Lock-0.50.0-r1.ebuild
index 0ad4cc422f4811d23a5ef559d16d2a580542dbb9..0f9649b7ea442522f5067495bb99c542bc074eb1 100644 (file)
--- a/dev-perl/DB_File-Lock/DB_File-Lock-0.50.0-r1.ebuild
+++ b/dev-perl/DB_File-Lock/DB_File-Lock-0.50.0-r1.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2014 Gentoo Foundation
+# Copyright 1999-2016 Gentoo Foundation
 # Distributed under the terms of the GNU General Public License v2
 # $Id$
 
@@ -17,4 +17,6 @@ IUSE=""
 RDEPEND="virtual/perl-DB_File"
 DEPEND="${RDEPEND}"
 
+PATCHES=("${FILESDIR}/${PN}-${MODULE_VERSION}-RT98224.patch")
+
 SRC_TEST=do

diff --git a/dev-perl/DB_File-Lock/files/DB_File-Lock-0.05-RT98224.patch b/dev-perl/DB_File-Lock/files/DB_File-Lock-0.05-RT98224.patch
new file mode 100644 (file)
index 0000000..6826daf
--- /dev/null
+++ b/dev-perl/DB_File-Lock/files/DB_File-Lock-0.05-RT98224.patch
@@ -0,0 +1,29 @@
+From 247a7ec3a57f2bca977531281f258d5e4ed46c1f Mon Sep 17 00:00:00 2001
+From: Slaven Rezic <slaven@rezic.de>
+Date: Thu, 21 Aug 2014 19:54:41 +0200
+Subject: [PATCH] don't use defined %hash
+
+This fixes https://rt.cpan.org/Ticket/Display.html?id=98224
+---
+ test.pl | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+ mode change 100644 => 100755 test.pl
+
+diff --git a/test.pl b/test.pl
+old mode 100644
+new mode 100755
+index 92ebcf6..cba6da6
+--- a/test.pl
++++ b/test.pl
+@@ -81,7 +81,7 @@ if ( not defined $pid ) {
+       sleep(1);
+       $TEST_NUM += 2;
+       report_result( not tie %hash3, 'DB_File::Lock', $file1, O_RDWR, 0600, $DB_HASH, $nonblock_write );
+-      report_result( not defined %hash3 ); # double check and satisfy -w about %hash3
++      report_result( not keys %hash3 ); # double check and satisfy -w about %hash3
+       $TEST_NUM += 1;
+       report_result( wait() == $pid );
+       report_result( tie %hash3, 'DB_File::Lock', $file1, O_RDWR, 0600, $DB_HASH, $nonblock_write );
+-- 
+1.8.3.4
+