diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-08-29 18:12:56 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-29 18:20:16 -0700 |
commit | d6d78e19334f3abcd2eb659205839eb1295aacbf (patch) | |
tree | ef100408f692009cc5b370bb1e9d556aa024412c /gv.c | |
parent | 58536d157b70c5107d3c064bf009dfb9b52919ce (diff) | |
download | perl-d6d78e19334f3abcd2eb659205839eb1295aacbf.tar.gz |
&CORE::unpack()
This commit allows &CORE::unpack to be called through references and
via ampersand syntax.
It moves the $_-handling code in pp_coreargs inside the parameter
loop, so it can apply to the second parameter, not just the first.
Consequently, a mkdir test has been added that ensures implicit $_
is not used for mkdir’s second argument; i.e., that the $_-handling
code’s if() condition is correct.
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1363,7 +1363,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags, case KEY_stat: case KEY_system: case KEY_truncate: case KEY_unlink: - case KEY_unpack: case KEY_unshift: + case KEY_unshift: case KEY_values: case KEY_write: ampable = FALSE; } |