[libnet-socks-perl] 01/02: Refresh patches, update headers.

[gregor herrmann]

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

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

commit 7f74b88643a79faa4bd6368e1dfeaaff595b6eec
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri Sep 8 22:57:58 2017 +0200

    Refresh patches, update headers.
---
 debian/patches/10_example.patch  | 14 +++++++++-----
 debian/patches/20_SOCKS-pm.patch | 12 ++++++++----
 debian/patches/30_dns.patch      | 12 ++++++++----
 3 files changed, 25 insertions(+), 13 deletions(-)

diff --git a/debian/patches/10_example.patch b/debian/patches/10_example.patch
old mode 100755
new mode 100644
index c37b57d..0a7681d
--- a/debian/patches/10_example.patch
+++ b/debian/patches/10_example.patch
@@ -1,10 +1,14 @@
-From: Sebastien Delafond <sdelafond at gmx.net>
 Subject: Change shebang to /usr/bin/perl
   Ask for command-line parameters
   Remove the "accept"part of the listening test
+Origin: vendor
+Forwarded: no
+From: Sebastien Delafond <sdelafond at gmx.net>
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2017-09-08
 
---- SOCKS-0.03.orig/example  1998-05-19 04:49:07.000000000 -0700
-+++ SOCKS-0.03/example  2004-09-20 11:29:27.000000000 -0700
+--- a/example
++++ b/example
 @@ -1,19 +1,32 @@
 -#!/usr/local/bin/perl -w
 +#!/usr/bin/perl -w
@@ -64,7 +68,7 @@ Subject: Change shebang to /usr/bin/perl
 -			peer_port => 9999);
 +# We expect a connection from $target_addr:9999
 +# This is just for the sake of testing that the SOCKS proxy lets us
-+# listen: we of course won't initiate a connection from 
++# listen: we of course won't initiate a connection from
 +# $target_addr:9999 (and in the majoirty of cases, we simply *can not*,
 +# since $target_addr is likely to be remote)
 +# --Seb
@@ -85,7 +89,7 @@ Subject: Change shebang to /usr/bin/perl
 +# Following is commented out, according to comment above.
 +#  $f= $sock->accept();
 +#}
-+#print "accept status: ", 
++#print "accept status: ",
 +#	Net::SOCKS::status_message($sock->param('status_num')), "\n";
 +#
 +#if ($sock->param('status_num') == SOCKS_OKAY) {
diff --git a/debian/patches/20_SOCKS-pm.patch b/debian/patches/20_SOCKS-pm.patch
index cbc3fc4..0093d73 100644
--- a/debian/patches/20_SOCKS-pm.patch
+++ b/debian/patches/20_SOCKS-pm.patch
@@ -1,8 +1,12 @@
-From: Sebastien Delafond <sdelafond at gmx.net>
 Subject: Added a test to get rid of a warning message
+Origin: vendor
+Forwarded: no
+From: Sebastien Delafond <sdelafond at gmx.net>
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2017-09-08
 
---- SOCKS-0.03.orig/lib/Net/SOCKS.pm	2004-10-24 16:14:19.000000000 -0700
-+++ SOCKS-0.03/lib/Net/SOCKS.pm	1998-05-19 05:22:47.000000000 -0700
+--- a/lib/Net/SOCKS.pm
++++ b/lib/Net/SOCKS.pm
 @@ -231,7 +231,13 @@
        ${*self}{listen_addr} = ${*self}{socks_addr};
      }
@@ -13,7 +17,7 @@ Subject: Added a test to get rid of a warning message
 +	$dotted_dec = ${*self}{listen_addr};
 +    } else {
 +	$dotted_dec = inet_ntoa( pack ("N", ${*self}{listen_addr} ) );
-+    } 
++    }
 +
      if (${*self}{status_num}==SOCKS_OKAY) {
        return (${*self}{listen_addr}, $dotted_dec, ${*self}{listen_port})
diff --git a/debian/patches/30_dns.patch b/debian/patches/30_dns.patch
old mode 100755
new mode 100644
index 01e7b3c..d263ba2
--- a/debian/patches/30_dns.patch
+++ b/debian/patches/30_dns.patch
@@ -1,9 +1,13 @@
-From: Christian Schwarz <chris at schwarz-online.com>
 Subject: Resolve name to numeric IP
+Origin: vendor
+Bug-Debian: https://bugs.debian.org/400599
+Forwarded: no
+From: Christian Schwarz <chris at schwarz-online.com>
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2017-09-08
 
-diff -urNad libnet-socks-perl-0.03~/lib/Net/SOCKS.pm libnet-socks-perl-0.03/lib/Net/SOCKS.pm
---- libnet-socks-perl-0.03~/lib/Net/SOCKS.pm	2006-11-28 00:48:44.000000000 -0800
-+++ libnet-socks-perl-0.03/lib/Net/SOCKS.pm	2006-11-28 00:48:51.000000000 -0800
+--- a/lib/Net/SOCKS.pm
++++ b/lib/Net/SOCKS.pm
 @@ -8,6 +8,7 @@
  use vars qw($VERSION @ISA @EXPORT);
  use IO::Socket;

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