This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
win32 tweak
authorGurusamy Sarathy <gsar@cpan.org>
Mon, 25 Oct 1999 07:38:15 +0000 (07:38 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Mon, 25 Oct 1999 07:38:15 +0000 (07:38 +0000)
p4raw-id: //depot/perl@4450

win32/perllib.c

index f6cc632..e8d59cd 100644 (file)
@@ -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);
 }