diff options
| author | Chip Salzenberg <chip@pobox.com> | 2008-12-05 05:32:19 -0800 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2008-12-09 09:38:06 +0000 |
| commit | f1618b100c0ec32f92c22129d95b09365ef17941 (patch) | |
| tree | 937fdc7a85d94ab548cf6910f9ee69f4514a5eae /util.c | |
| parent | 4b7873d4137f21313c553e93ca4669017b65191f (diff) | |
| download | perl-f1618b100c0ec32f92c22129d95b09365ef17941.tar.gz | |
Re: [PATCH] standardize save/restore of errno & vaxc$errno
Message-ID: <20081205213219.GH16081@tytlal.topaz.cx>
p4raw-id: //depot/perl@35059
Diffstat (limited to 'util.c')
| -rw-r--r-- | util.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -2875,8 +2875,8 @@ Perl_my_pclose(pTHX_ PerlIO *ptr) return my_syspclose(ptr); } #endif - if ((close_failed = (PerlIO_close(ptr) == EOF))) - SAVE_ERRNO; + close_failed = (PerlIO_close(ptr) == EOF); + SAVE_ERRNO; #ifdef UTS if(PerlProc_kill(pid, 0) < 0) { return(pid); } /* HOM 12/23/91 */ #endif |