This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: f0a7817) | patch
In PerlIO_debug(), if tainting or set*id, set PL_perlio_debug_fd to -1
authorNicholas Clark <nick@ccl4.org>
Sun, 1 Oct 2006 20:22:02 +0000 (20:22 +0000)
committerNicholas Clark <nick@ccl4.org>
Sun, 1 Oct 2006 20:22:02 +0000 (20:22 +0000)
commit582588d244ad30f176d66f31670f637b0bdb9884
tree3aad5e45446450f5b43f58b626f32632955ede15tree | snapshot
parentf0a78170a1cd45c5019f6c77288041aa0767e0ffcommit | diff
In PerlIO_debug(), if tainting or set*id, set PL_perlio_debug_fd to -1
first time through to reduce the checks on subsequent calls.

p4raw-id: //depot/perl@28911
perlio.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.