This is an automated email from the git hooks/post-receive script. dmn pushed a commit to branch fcntl-any in repository libfile-fcntllock-perl.
commit 043044fd33aacf913cda69b4d64c6e757580925a Author: Damyan Ivanov <d...@debian.org> Date: Wed Oct 25 21:03:16 2017 +0000 add File::FcntlLock::Any module, trying ::XS, ::Pure and ::Inline --- debian/patches/fcntllock-any.patch | 39 ++++++++++++++++++++++++++++++++++++++ debian/patches/series | 1 + 2 files changed, 40 insertions(+) diff --git a/debian/patches/fcntllock-any.patch b/debian/patches/fcntllock-any.patch new file mode 100644 index 0000000..c2e35e0 --- /dev/null +++ b/debian/patches/fcntllock-any.patch @@ -0,0 +1,39 @@ +Description: Add File::FcntlLock::Any + As discussed in https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=677865, + an ::Any module is supposed to be archirecture-independent and try to + load ::XS, ::Pure and ::Inline, in that order. +Author: Damyan Ivanov <d...@debian.org> + +--- /dev/null ++++ b/lib/File/FcntlLock/Any.pm +@@ -0,0 +1,30 @@ ++package File::FcntlLock::Any; ++ ++use strict; ++use warnings; ++ ++use Config; ++use lib "$Config{libsdirs}/libfile-fcntllock-perl"; ++ ++my $implementation; ++ ++BEGIN { ++ my $impl; ++ for ( qw(XS Pure Inline) ) { ++ if ( eval "use File::FcntlLock::$_; 1" ) { ++ $impl = $_; ++ last; ++ } ++ else { ++ warn "Loading File::FcntlLock::$_: $@" if 0; ++ } ++ } ++ ++ die "Unable to find usable implementation" unless $impl; ++ ++ $implementation = "File::FcntlLock::$impl"; ++ our @ISA = $implementation; ++ warn "Using $implementation" if 0; ++} ++ ++1; diff --git a/debian/patches/series b/debian/patches/series index 5299247..d19db46 100644 --- a/debian/patches/series +++ b/debian/patches/series @@ -1 +1,2 @@ spelling.patch +fcntllock-any.patch -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libfile-fcntllock-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits