diff options
Diffstat (limited to 'cpan/dist/Socket6/im-140.diff')
| -rw-r--r-- | cpan/dist/Socket6/im-140.diff | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cpan/dist/Socket6/im-140.diff b/cpan/dist/Socket6/im-140.diff index c3e64c47..6771568e 100644 --- a/cpan/dist/Socket6/im-140.diff +++ b/cpan/dist/Socket6/im-140.diff @@ -18,7 +18,7 @@ - @he_infos = im_getaddrinfo($s, $remoteport, AF_UNSPEC, SOCK_STREAM); + $0 = progname() . ": getaddrinfo($s)"; + @he_infos = getaddrinfo($s, $remoteport, AF_UNSPEC, SOCK_STREAM); - if ($#he_infos < 0) { + if ($#he_infos < 1) { im_warn("address unknown for $s\n"); @Response = ("address unknown for $s"); @@ -147,7 +150,7 @@ |