File spampd-2.42_git_20170226.patch of Package spamassassin
diff -ur spampd-2.42/spampd.html spampd-2.42_20170226/spampd.html
--- spampd-2.42.orig/spampd.html 2013-12-08 12:34:02.000000000 +0100
+++ spampd-2.42/spampd.html 2015-10-18 01:22:58.000000000 +0200
@@ -96,7 +96,7 @@
<DD>
<DT><STRONG><A NAME="item_IO%3A%3AFile"><STRONG>IO::File</STRONG></A></STRONG><BR>
<DD>
-<DT><STRONG><A NAME="item_IO%3A%3ASocket"><STRONG>IO::Socket</STRONG></A></STRONG><BR>
+<DT><STRONG><A NAME="item_IO%3A%3ASocket"><STRONG>IO::Socket::IP</STRONG></A></STRONG><BR>
<DD>
<DT><STRONG><A NAME="item_HiRes"><STRONG>Time::HiRes</STRONG> (not actually required but recommended)</A></STRONG><BR>
<DD>
diff -ur spampd-2.42/spampd.pl spampd-2.42_20170226/spampd.pl
--- spampd-2.42/spampd.pl 2013-12-08 12:34:02.000000000 +0100
+++ spampd-2.42_20170226/spampd.pl 2015-10-18 01:22:58.000000000 +0200
@@ -307,19 +307,19 @@
# =cut
use strict;
-use IO::Socket;
+use IO::Socket::IP;
# =item new(interface => $interface, port => $port[, timeout = 300]);
#
# The interface and port to talk to must be specified. The interface
# must be a valid numeric IP address; the port must be numeric. If
# this call succeeds, it returns a client structure with an open
-# IO::Socket::INET in it, ready to talk to. If it fails it dies,
+# IO::Socket::IP in it, ready to talk to. If it fails it dies,
# so if you want anything other than an exit with an explanatory
# error message, wrap the constructor call in an eval block and pull
# the error out of $@ as usual. This is also the case for all other
# methods; they succeed or they die. The timeout parameter is passed
-# on into the IO::Socket::INET constructor.
+# on into the IO::Socket::IP constructor.
#
# =cut
@@ -327,7 +327,7 @@
my ($this, @opts) = @_;
my $class = ref($this) || $this;
my $self = bless { timeout => 300, @opts }, $class;
- $self->{sock} = IO::Socket::INET->new(
+ $self->{sock} = IO::Socket::IP->new(
PeerAddr => $self->{interface},
PeerPort => $self->{port},
Timeout => $self->{timeout},
@@ -1171,7 +1171,7 @@
=item B<IO::File>
-=item B<IO::Socket>
+=item B<IO::Socket::IP>
=item B<Time::HiRes> (not actually required but recommended)