This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
S_find_beginning is only called from one place, so by hoisting the
authorNicholas Clark <nick@ccl4.org>
Fri, 3 Feb 2006 23:21:37 +0000 (23:21 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 3 Feb 2006 23:21:37 +0000 (23:21 +0000)
commitfaef540c8909a0bd99951f9de3e335c74b33dad1
treedd42b0f5c4a9fa083d74b28df09f3a2b3084a705
parent97bd566409a94bf7961734af3ac8131276ce086b
S_find_beginning is only called from one place, so by hoisting the
forbid_setid check for -x into the caller, we can eliminate the
suidscript parameter from S_find_beginning.

p4raw-id: //depot/perl@27076
embed.fnc
embed.h
perl.c
proto.h