diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-02-15 16:18:34 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-02-15 17:40:59 +0000 |
| commit | a26c0e281cb6068a8d148933281d8186f1eb4206 (patch) | |
| tree | ffc145e69008c8dc8e4ccddfd23b0ffb72800635 /embed.fnc | |
| parent | 55b4bc1cac18bd560bcd9386594a419294fafc1d (diff) | |
| download | perl-a26c0e281cb6068a8d148933281d8186f1eb4206.tar.gz | |
Loop in S_init_perllib(), only calling S_incpush*() with INCPUSH_ADD_OLD_VERS
the second time (and only for those entries at had it). Implement the loop by
calling init_perllib() twice, to avoid a rats nest of re-indenting. Add a new
flag to S_incpush() INCPUSH_NOT_BASEDIR, to supress pushing the base directory
a second time on the secnod call.
With this change, re-ordering of @INC from version-orientated to prefix-
orientated is partly complete. ARCHLIB and PRIVLIB remain at their old place in
the @INC order.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1479,7 +1479,7 @@ s |void |incpush_use_sep|NULLOK const char *p|U32 flags s |void |init_interp s |void |init_ids s |void |init_main_stash -s |void |init_perllib +s |void |init_perllib |U32 old_vers s |void |init_postdump_symbols|int argc|NN char **argv|NULLOK char **env s |void |init_predump_symbols rs |void |my_exit_jump |