diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-12-22 22:48:58 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-24 09:25:19 -0800 |
commit | ef744b2941d9092cc1d28a001826c37cdc49b359 (patch) | |
tree | c565ea0bc75e9b3f2ef4a1fa8b18126f84722612 /feature.h | |
parent | 87f54e9c952c27bd11af754de11f1dea2af1a0d2 (diff) | |
download | perl-ef744b2941d9092cc1d28a001826c37cdc49b359.tar.gz |
feature.h: FEATURE_IS_ENABLED can use CURRENT_HINTS
Diffstat (limited to 'feature.h')
-rw-r--r-- | feature.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -20,7 +20,7 @@ #define CURRENT_FEATURE_BUNDLE (CURRENT_HINTS >> HINT_FEATURE_SHIFT) #define FEATURE_IS_ENABLED(name) \ - (((PL_curcop == &PL_compiling ? PL_hints : PL_curcop->cop_hints) \ + ((CURRENT_HINTS \ & HINT_LOCALIZE_HH) \ && Perl_feature_is_enabled(aTHX_ STR_WITH_LEN(name))) /* The longest string we pass in. */ |