diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-12-26 13:12:44 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-12-26 13:16:54 +0100 |
| commit | 20189146be79a0596543441fa369c6bf7f85103f (patch) | |
| tree | 0e17232830618919d800925bb0bc6ef966ea53dd /embed.h | |
| parent | e7049783a827d931f30447582253605eb3b93210 (diff) | |
| download | perl-20189146be79a0596543441fa369c6bf7f85103f.tar.gz | |
Better fix for bug #6665
Add a parameter to S_incpush to indicate if the new directory should be
appended or prepended to @INC, and use it set to TRUE when parsing the
shebang line.
There is also a better version of the test.
This replaces commit ccb8f6a64f3dd06b4360bc27c194b28e6766a6ad.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3638,7 +3638,7 @@ #ifdef PERL_CORE #define find_beginning(a,b) S_find_beginning(aTHX_ a,b) #define forbid_setid(a,b) S_forbid_setid(aTHX_ a,b) -#define incpush(a,b,c,d,e) S_incpush(aTHX_ a,b,c,d,e) +#define incpush(a,b,c,d,e,f) S_incpush(aTHX_ a,b,c,d,e,f) #define init_interp() S_init_interp(aTHX) #define init_ids() S_init_ids(aTHX) #define init_main_stash() S_init_main_stash(aTHX) |