This is an automated email from the git hooks/post-receive script.
gregoa pushed a commit to branch master
in repository libnet-snpp-perl.
commit 31a5e8df3f8a2a56f5547b6f0b13503178ed4363
Author: gregor herrmann <gre...@debian.org>
Date: Fri Aug 19 21:54:21 2016 +0200
Add patch from CPAN RT for libnet-3.08 compatibility.
Closes: #825609
---
...1.17-Define-dummy-Net-SNPP-Server-timeout.patch | 49 ++++++++++++++++++++++
debian/patches/series | 1 +
2 files changed, 50 insertions(+)
diff --git
a/debian/patches/Net-SNPP-1.17-Define-dummy-Net-SNPP-Server-timeout.patch
b/debian/patches/Net-SNPP-1.17-Define-dummy-Net-SNPP-Server-timeout.patch
new file mode 100644
index 0000000..34bd322
--- /dev/null
+++ b/debian/patches/Net-SNPP-1.17-Define-dummy-Net-SNPP-Server-timeout.patch
@@ -0,0 +1,49 @@
+From ca1772ca23fe771ea91b7557aa0cb2b035961fee Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppi...@redhat.com>
+Date: Mon, 18 Jan 2016 14:33:00 +0100
+Subject: [PATCH] Define dummy Net::SNPP::Server->timeout
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+Since libnet-3.08, Net::Cmd subclasses should provide timeout()
+method. Otherwise tests fail like in CPAN RT#111013. See #110978.
+
+This patch returns static 0 value because the first timeout() argument
+is not an object reference. This is probably because Net::SNPP::Server
+does not subclass Net::Cmd properly. See libnet's t/datasend.t for
+example.
+
+Signed-off-by: Petr Písař <ppi...@redhat.com>
+
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=111013
+Bug-Debian: https://bugs.debian.org/825609
+
+Note: This patch can be removed when libnet-3.09 becomes available which
+defines a default Net::Cmd::timeout():
+https://github.com/steve-m-hay/perl-libnet/commit/91e593b615334fa76ef0454c4e601b98b6663841
+
+---
+ lib/Net/SNPP/Server.pm | 6 ++++++
+ 1 file changed, 6 insertions(+)
+
+diff --git a/lib/Net/SNPP/Server.pm b/lib/Net/SNPP/Server.pm
+index 5cb999f..1482ca7 100644
+--- a/lib/Net/SNPP/Server.pm
++++ b/lib/Net/SNPP/Server.pm
+@@ -129,6 +129,12 @@ sub new {
+ return bless( $self, $class );
+ }
+
++# Required by Net::Cmd, CPAN RT#111013, #110978
++sub timeout {
++ # The $_[0] is not an object reference, cannot use $self->{Timeout}
++ 0;
++}
++
+ =item client()
+
+ Calls accept() for you and returns a client handle. This method
+--
+2.5.0
+
diff --git a/debian/patches/series b/debian/patches/series
index 566a643..1194802 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
fix_manpage.patch
+Net-SNPP-1.17-Define-dummy-Net-SNPP-Server-timeout.patch
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libnet-snpp-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
