Integrate macperl patch #16868.

[p5sagit/p5-mst-13.2.git] / ext / IO / lib / IO / Pipe.pm

diff --git a/ext/IO/lib/IO/Pipe.pm b/ext/IO/lib/IO/Pipe.pm
index 0aaa2d7..0b5aac4 100644 (file)
--- a/ext/IO/lib/IO/Pipe.pm
+++ b/ext/IO/lib/IO/Pipe.pm
@@ -166,15 +166,15 @@ IO::Pipe - supply object methods for pipes
        if($pid = fork()) { # Parent
            $pipe->reader();
 
-           while(<$pipe> {
-               ....
+           while(<$pipe>) {
+               ...
            }
 
        }
        elsif(defined $pid) { # Child
            $pipe->writer();
 
-           print $pipe ....
+           print $pipe ...
        }
 
        or
@@ -184,7 +184,7 @@ IO::Pipe - supply object methods for pipes
        $pipe->reader(qw(ls -l));
 
        while(<$pipe>) {
-           ....
+           ...
        }
 
 =head1 DESCRIPTION