diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-04-22 20:00:14 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-05-21 16:51:29 -0700 |
| commit | fef4c52051113bd46321354d9557a9f9d6a6b092 (patch) | |
| tree | ed3392bcb6da6c8e1d800ef232a8585f8b5a8bdc /ext | |
| parent | acd917a26f0caa43d13c36370feea32ad0d4997f (diff) | |
| download | perl-fef4c52051113bd46321354d9557a9f9d6a6b092.tar.gz | |
Teach B::Concise about UTF8 labels
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/B/B/Concise.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/B/B/Concise.pm b/ext/B/B/Concise.pm index 7ec9b74512..6d4b831862 100644 --- a/ext/B/B/Concise.pm +++ b/ext/B/B/Concise.pm @@ -664,6 +664,7 @@ if ($] >= 5.009) { } $priv{$_}{128} = '+1' for qw "caller wantarray runcv"; @{$priv{coreargs}}{1,2,64,128} = ('DREF1','DREF2','$MOD','MARK'); +$priv{$_}{128} = 'UTF' for qw "last redo next goto dump"; our %hints; # used to display each COP's op_hints values |