diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-05-20 22:08:42 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-05-20 22:08:42 -0700 |
| commit | 65cb9c6e43e223c034d3da09823edc6e436a0680 (patch) | |
| tree | c7fce729e84baa6a7d69041c891d092290ee2f21 /dist | |
| parent | 6ee65224aedb84644f355c13980564ff5f0a6dfd (diff) | |
| download | perl-65cb9c6e43e223c034d3da09823edc6e436a0680.tar.gz | |
Revert "Revert "Missing bug number in d12b49d""
This reverts commit d33333ec9850d2a0f2f5466e207dcc612dc4dc31.
Diffstat (limited to 'dist')
| -rw-r--r-- | dist/constant/lib/constant.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dist/constant/lib/constant.pm b/dist/constant/lib/constant.pm index 83bfa6623f..085ce46eff 100644 --- a/dist/constant/lib/constant.pm +++ b/dist/constant/lib/constant.pm @@ -117,7 +117,7 @@ sub import { if ($multiple || @_ == 1) { my $scalar = $multiple ? $constants->{$name} : $_[0]; - # Work around perl bug #xxxxx: Sub names (actually glob + # Work around perl bug #31991: Sub names (actually glob # names in general) ignore the UTF8 flag. So we have to # turn it off to get the "right" symbol table entry. utf8::is_utf8 $name and utf8::encode $name; |