[ID 20000908.002] perlipc documentation bug.

Message-Id: <39B8C1A8.3DC36E6D@crdp.ac-caen.fr>

p4raw-id: //depot/perl@7036

diff --git a/pod/perlipc.pod b/pod/perlipc.pod
index 6a3d158..94b6bde 100644 (file)
--- a/pod/perlipc.pod
+++ b/pod/perlipc.pod
@@ -745,6 +745,7 @@ go back to service a new client.
                at port $port";
 
        spawn sub {
+           $|=1;
            print "Hello there, $name, it's now ", scalar localtime, $EOL;
            exec '/usr/games/fortune'           # XXX: `wrong' line terminators
                or confess "can't exec fortune: $!";