diff options
| author | Steffen Ullrich <coyote.frank@gmx.net> | 2008-02-26 20:43:00 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-03-02 07:36:58 +0000 |
| commit | 48dbb59ed9af112b035bdcc063c1471a22ec25a2 (patch) | |
| tree | 07a0444f8e2195b3df7f68b47fa97919b91239a1 | |
| parent | 0544e6df68c5534300178fdd73628d687be1a6b2 (diff) | |
| download | perl-48dbb59ed9af112b035bdcc063c1471a22ec25a2.tar.gz | |
Re: interrupting system() with signal depends on signal handler
Message-ID: <47C45DB4.9060306@gmx.net>
p4raw-id: //depot/perl@33408
| -rw-r--r-- | util.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -3011,6 +3011,7 @@ Perl_wait4pid(pTHX_ Pid_t pid, int *statusp, int flags) #endif if (result < 0 && errno == EINTR) { PERL_ASYNC_CHECK(); + errno = EINTR; /* reset in case a signal handler changed $! */ } return result; } |