diff options
author | chromatic <chromatic@wgz.org> | 2001-08-27 05:17:09 -0600 |
---|---|---|
committer | Abhijit Menon-Sen <ams@wiw.org> | 2001-08-27 16:31:53 +0000 |
commit | 2ac1ef3d129ac2446fc0d2ea08ecbbd4bd583ff4 (patch) | |
tree | 7b75339008ac4b08df201adcfc7374ef6c0294ad /lib | |
parent | 4d1ff10ffec86208b0da135b87c76b89e61c866e (diff) | |
download | perl-2ac1ef3d129ac2446fc0d2ea08ecbbd4bd583ff4.tar.gz |
pod/perlfunc.pod, lib/Net/Ping.pm, ext/POSIX/POSIX.pod
Message-Id: <20010827172111.89491.qmail@onion.perl.org>
p4raw-id: //depot/perl@11759
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Net/Ping.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Net/Ping.pm b/lib/Net/Ping.pm index 5ab3508a64..e74f6684df 100644 --- a/lib/Net/Ping.pm +++ b/lib/Net/Ping.pm @@ -353,7 +353,7 @@ sub ping_tcp_win32 # Wait for the child to return or for the timeout to expire. do { - $child = waitpid($pid, &WNOHANG); + $child = waitpid($pid, WNOHANG); $ret = $?; } until time > ($time + $timeout) or $child; |