[libperl5i-perl] 02/08: Add patch from upstream bug tracker for perl 5.24 compatibility.

gregor herrmann gregoa at debian.org
Sun May 29 15:37:12 UTC 2016


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libperl5i-perl.

commit 1e173318d84c36085520507950384b28d9f1c60a
Author: gregor herrmann <gregoa at debian.org>
Date:   Sun May 29 17:25:22 2016 +0200

    Add patch from upstream bug tracker for perl 5.24 compatibility.
    
    Closes: #825612
---
 debian/patches/series                 |  1 +
 debian/patches/stat_perl_5.23.3.patch | 31 +++++++++++++++++++++++++++++++
 2 files changed, 32 insertions(+)

diff --git a/debian/patches/series b/debian/patches/series
index 5cb46b8..0954934 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,3 +1,4 @@
 fix-test-for-mips
 cherry-pick-d096ee5e-fix-perl5i-dash-e-from-segfaulting
 dont-use-dash-Ilib
+stat_perl_5.23.3.patch
diff --git a/debian/patches/stat_perl_5.23.3.patch b/debian/patches/stat_perl_5.23.3.patch
new file mode 100644
index 0000000..5293603
--- /dev/null
+++ b/debian/patches/stat_perl_5.23.3.patch
@@ -0,0 +1,31 @@
+From 26a254ddaabe2a35d60ff4b9336e522bceb2e5a5 Mon Sep 17 00:00:00 2001
+From: Slaven Rezic <srezic at cpan.org>
+Date: Tue, 22 Mar 2016 00:54:30 +0000
+Subject: [PATCH] fix stat() and lstat() calls for perl 5.23.3+ (#291)
+
+Bug: https://github.com/evalEmpire/perl5i/issues/291
+Bug-Debian: https://bugs.debian.org/825612
+
+---
+ lib/perl5i/2.pm | 4 ++--
+ 1 file changed, 2 insertions(+), 2 deletions(-)
+
+diff --git a/lib/perl5i/2.pm b/lib/perl5i/2.pm
+index 961f08d..aa3682c 100644
+--- a/lib/perl5i/2.pm
++++ b/lib/perl5i/2.pm
+@@ -188,12 +188,12 @@ sub perl5i_die {
+ 
+ # File::stat does not play nice in list context
+ sub stat {
+-    return CORE::stat(@_) if wantarray;
++    return CORE::stat($_[0]) if wantarray;
+     return File::stat::stat(@_);
+ }
+ 
+ sub lstat {
+-    return CORE::lstat(@_) if wantarray;
++    return CORE::lstat($_[0]) if wantarray;
+     return File::stat::lstat(@_);
+ }
+ 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libperl5i-perl.git



More information about the Pkg-perl-cvs-commits mailing list