[arch-commits] Commit in perl-bit-vector/trunk (Bit-Vector-destroy.patch PKGBUILD)

[Evangelos Foutras]

    Date: Monday, May 20, 2013 @ 00:00:17
  Author: foutrelis
Revision: 185951

upgpkg: perl-bit-vector 7.2-3

Perl 5.18 rebuild.

Added:
  perl-bit-vector/trunk/Bit-Vector-destroy.patch
Modified:
  perl-bit-vector/trunk/PKGBUILD

--------------------------+
 Bit-Vector-destroy.patch |   27 +++++++++++++++++++++++++++
 PKGBUILD                 |   18 ++++++++++++++----
 2 files changed, 41 insertions(+), 4 deletions(-)

Added: Bit-Vector-destroy.patch
===================================================================
--- Bit-Vector-destroy.patch	                        (rev 0)
+++ Bit-Vector-destroy.patch	2013-05-19 22:00:17 UTC (rev 185951)
@@ -0,0 +1,27 @@
+From 0646f34fc3eeb47627822df860986cf7bee4ebed Mon Sep 17 00:00:00 2001
+From: Gisle Aas <gisle at activestate.com>
+Date: Thu, 28 Mar 2013 00:41:07 -0700
+Subject: [PATCH] eval { 1->method } triggers different error in 5.17.11
+
+---
+ t/02_____destroy.t |    4 +++-
+ 1 files changed, 3 insertions(+), 1 deletions(-)
+
+diff --git a/t/02_____destroy.t b/t/02_____destroy.t
+index 41e3aa3..adcf995 100644
+--- a/t/02_____destroy.t
++++ b/t/02_____destroy.t
+@@ -17,7 +17,9 @@ if (ref($set) eq '')
+ {print "ok $n\n";} else {print "not ok $n\n";}
+ $n++;
+ eval { $set->DESTROY(); };
+-if ($@ =~ /Can't call method "DESTROY" without a package or object reference/)
++if ($@ =~ /Can't call method "DESTROY" without a package or object reference/ ||
++    $@ =~ /Can't locate object method "DESTROY" via package "1"/
++)
+ {print "ok $n\n";} else {print "not ok $n\n";}
+ $n++;
+ eval { Bit::Vector::DESTROY($set); };
+-- 
+1.7.0.5
+

Modified: PKGBUILD
===================================================================
--- PKGBUILD	2013-05-19 21:51:17 UTC (rev 185950)
+++ PKGBUILD	2013-05-19 22:00:17 UTC (rev 185951)
@@ -1,20 +1,30 @@
 # $Id$
-# Maintainer: Kevin Piche <kevin at archlinux.org>
+# Maintainer:
+# Contributor: Kevin Piche <kevin at archlinux.org>
 # Contributor: K. Piche <kpiche at rogers.com>
 
 pkgname=perl-bit-vector
 _cpanname=Bit-Vector
 pkgver=7.2
-pkgrel=2
+pkgrel=3
 pkgdesc='Efficient bit vector, set of integers and "big int" math library'
 arch=('i686' 'x86_64')
 license=('GPL' 'LGPL' 'PerlArtistic')
 url="http://search.cpan.org/dist/${_cpanname}/"
 depends=('perl-carp-clan' 'perl')
 options=('!emptydirs')
-source=(http://search.cpan.org/CPAN/authors/id/A/AN/ANDK/${_cpanname}-${pkgver}.tar.gz)
-md5sums=('bc6ae34738b8f889290bf50099ff8aed')
+source=(http://search.cpan.org/CPAN/authors/id/A/AN/ANDK/${_cpanname}-${pkgver}.tar.gz
+        Bit-Vector-destroy.patch)
+md5sums=('bc6ae34738b8f889290bf50099ff8aed'
+         'c86a55b84cb05dd04004ee8f56ee2ee3')
 
+prepare() {
+  cd "${srcdir}/${_cpanname}-$pkgver"
+
+  # https://rt.cpan.org/Public/Bug/Display.html?id=84250
+  patch -Np1 -i "${srcdir}/Bit-Vector-destroy.patch"
+}
+
 build() {
   cd "${srcdir}/${_cpanname}-$pkgver"
   # install module in vendor directories.