[libnet-server-perl] 01/06: Add patch to remove debug output.

[gregor herrmann]

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

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

commit 48602887af8958e752e29a8ad9a9dfe2ad9a6af8
Author: gregor herrmann <gregoa at debian.org>
Date:   Mon Mar 14 20:14:45 2016 +0100

    Add patch to remove debug output.
    
    Closes: #818145
---
 debian/patches/debug-output.patch | 17 +++++++++++++++++
 debian/patches/series             |  1 +
 2 files changed, 18 insertions(+)

diff --git a/debian/patches/debug-output.patch b/debian/patches/debug-output.patch
new file mode 100644
index 0000000..00f96aa
--- /dev/null
+++ b/debian/patches/debug-output.patch
@@ -0,0 +1,17 @@
+Description: remove debug output
+Origin: vendor
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=85604
+Bug-Debian: https://bugs.debian.org/818145
+Author: gregor herrmann <gregoa at debian.org>
+Last-Update: 2016-03-14
+
+--- a/lib/Net/Server.pm
++++ b/lib/Net/Server.pm
+@@ -530,7 +530,6 @@
+             ($prop->{'peerport'}, $addr) = Socket::sockaddr_in($prop->{'udp_peer'});
+             $prop->{'peeraddr'} = Socket::inet_ntoa($addr);
+         } else {
+-            warn "Right here\n";
+             ($prop->{'peerport'}, $addr) = Socket6::sockaddr_in6($prop->{'udp_peer'});
+             $prop->{'peeraddr'} = Socket6->can('inet_ntop')
+                                 ? Socket6::inet_ntop($client->sockdomain, $addr)
diff --git a/debian/patches/series b/debian/patches/series
index c09b261..b87539d 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,3 +1,4 @@
 spelling-error.patch
 correct-SIG-confusion.patch
 fix-manpage-has-errors-from-pod2man.patch
+debug-output.patch

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