diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-09 22:47:39 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-09 22:47:39 +0000 |
| commit | 45bc920620377d5a7720d3d562c48df1eb0c2e68 (patch) | |
| tree | ddf80cf0881964ffc19fe3b1f195ebfb7cc09284 /vmesa/vmesa.c | |
| parent | 46a8855a50eb32c89dd161fbf5c3956ca0e452d8 (diff) | |
| download | perl-45bc920620377d5a7720d3d562c48df1eb0c2e68.tar.gz | |
flush all open output buffers before fork(), exec(), system, qx//
and pipe open() operations, simplifying buffering headaches faced
by users; uses fflush(NULL), which may need Configure test
p4raw-id: //depot/perl@3352
Diffstat (limited to 'vmesa/vmesa.c')
| -rw-r--r-- | vmesa/vmesa.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/vmesa/vmesa.c b/vmesa/vmesa.c index 11854335e0..0e7894aeb9 100644 --- a/vmesa/vmesa.c +++ b/vmesa/vmesa.c @@ -408,6 +408,7 @@ my_popen(char *cmd, char *mode) Perl_stdin_fd = pFd[that]; if (strNE(cmd,"-")) { + PERL_FLUSHALL_FOR_CHILD; pid = spawn_cmd(cmd, Perl_stdin_fd, Perl_stdout_fd); if (pid >= 0) { |