diff options
| -rw-r--r-- | win32/perllib.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/win32/perllib.c b/win32/perllib.c index f6cc6322bf..e8d59cdf36 100644 --- a/win32/perllib.c +++ b/win32/perllib.c @@ -1170,6 +1170,7 @@ PerlProcPauseProc(struct IPerlProc *I) PerlIO* PerlProcPopen(struct IPerlProc *I, const char *command, const char *mode) { + dTHXo; PERL_FLUSHALL_FOR_CHILD; return (PerlIO*)win32_popen(command, mode); } |