1
Index: ddclient-3.6.7/ddclient
2
===================================================================
3
--- ddclient-3.6.7.orig/ddclient 2006-04-15 12:27:28.000000000 +0200
4
+++ ddclient-3.6.7/ddclient 2006-04-15 12:29:11.000000000 +0200
6
debug("skipped network connection");
7
verbose("SENDING:", $request);
9
- } elsif (! defined($sd = IO::Socket::INET->new(PeerAddr => $peer, PeerPort => $port, Proto => 'tcp', MultiHomed => 1))) {
10
+ } elsif (! defined($sd = IO::Socket::INET->new(PeerAddr => $peer, PeerPort => $port, Proto => 'tcp', MultiHomed => 1, Timeout => opt('timeout')))) {
11
warning("cannot connect to $peer:$port socket: $@");