diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-02-15 14:01:18 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-02-15 17:40:59 +0000 |
commit | 20ce4c11399f59a97d3594520606e1c947b4dde3 (patch) | |
tree | 827dd036d6f37f2933a6159e55f69c2b0609b219 /perl.c | |
parent | 3d55b451d9544fbd4c27c33287b76bee30328830 (diff) | |
download | perl-20ce4c11399f59a97d3594520606e1c947b4dde3.tar.gz |
In S_incpush(), rename the parameter from dir to p, rather than copying it.
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -4272,7 +4272,7 @@ S_incpush_if_exists(pTHX_ AV *const av, SV *dir) } STATIC void -S_incpush(pTHX_ const char *dir, U32 flags) +S_incpush(pTHX_ const char *p, U32 flags) { dVAR; const U8 addsubdirs = flags & INCPUSH_ADD_SUB_DIRS; @@ -4281,7 +4281,6 @@ S_incpush(pTHX_ const char *dir, U32 flags) const U8 canrelocate = flags & INCPUSH_CAN_RELOCATE; const U8 unshift = flags & INCPUSH_UNSHIFT; SV *subdir = NULL; - const char *p = dir; AV *inc; if (!p || !*p) |