diff options
| author | fukachan <fukachan> | 2012-02-19 09:19:31 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2012-02-19 09:19:31 +0000 |
| commit | 8fa32127226a2a0423fb3e667319915b220e7d31 (patch) | |
| tree | d0665463c021c6f18b12b7fc9a4fa8b637d356d0 /cpan/dist/Socket6/im-140.diff | |
| parent | 18fe4128aa90553b29fe05347a5e490c6b0b73ae (diff) | |
| download | fml8-Socket6-0-23.tar.gz fml8-Socket6-0-23.tar.bz2 fml8-Socket6-0-23.zip | |
Socket6-0.23Socket6-0-23
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 @@ |
