[ID 20011207.001] documentation bug for waitpid

Message-Id: <200112071144.MAA12790@pc.xs4all.nl>

p4raw-id: //depot/perl@13511

diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod
index 2b20a4b..6d79b7a 100644 (file)
--- a/pod/perlfunc.pod
+++ b/pod/perlfunc.pod
@@ -6152,7 +6152,7 @@ The status is returned in C<$?>.  If you say
     #...
     do {
        $kid = waitpid(-1, WNOHANG);
-    } until $kid == -1;
+    } until $kid > 0;
 
 then you can do a non-blocking wait for all pending zombie processes.
 Non-blocking wait is available on machines supporting either the