diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-04-19 08:45:20 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-04-19 08:47:17 -0700 |
| commit | d33333ec9850d2a0f2f5466e207dcc612dc4dc31 (patch) | |
| tree | a1b2fd3dfce9b4eceac3c514cc5011da35c0eb63 | |
| parent | 91546a02a7148f08cc06ef36a850413e7ec9e731 (diff) | |
| download | perl-d33333ec9850d2a0f2f5466e207dcc612dc4dc31.tar.gz | |
Revert "Missing bug number in d12b49d"
This reverts commit 53777b0ce48433ad582498a56c60698a8fad29f6.
constant.pm 1.21 has already been released on CPAN. Reverting this for
now just keeps things simple.
| -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 5f030921b2..22566ce28c 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 #31991: Sub names (actually glob + # Work around perl bug #xxxxx: 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; |