diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-12-22 10:10:53 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-24 09:25:13 -0800 |
| commit | 61d30f47d59933fc5eb461d573a3a961fa08aa2b (patch) | |
| tree | d8e24edc3c66b02b531b3ea8689666690caf2d1b /gv.c | |
| parent | 67bdaa9e280ffc7971297e951d22b899b3dacd93 (diff) | |
| download | perl-61d30f47d59933fc5eb461d573a3a961fa08aa2b.tar.gz | |
Use only \w+ for internal feature names
This will make it possible to create macros for each.
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1940,7 +1940,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags, goto magicalize; case '[': /* $[ */ if ((sv_type == SVt_PV || sv_type == SVt_PVGV) - && FEATURE_IS_ENABLED_d("$[")) { + && FEATURE_IS_ENABLED_d("arybase")) { if (addmg) (void)hv_store(stash,name,len,(SV *)gv,0); require_tie_mod(gv,name,newSVpvs("arybase"),"FETCH",0); addmg = 0; |