summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/locale.pm9
1 files changed, 4 insertions, 5 deletions
diff --git a/lib/locale.pm b/lib/locale.pm
index fb91f0a7fa..e2317ca871 100644
--- a/lib/locale.pm
+++ b/lib/locale.pm
@@ -1,6 +1,6 @@
package locale;
-our $VERSION = '1.07';
+our $VERSION = '1.08';
use Config;
$Carp::Internal{ (__PACKAGE__) } = 1;
@@ -97,15 +97,14 @@ sub import {
$arg =~ s/^://;
eval { require POSIX; import POSIX 'locale_h'; };
- unless (defined &POSIX::LC_CTYPE) {
- return;
- }
# Map our names to the ones defined by POSIX
my $LC = "LC_" . uc($arg);
my $bit = eval "&POSIX::$LC";
- if (defined $bit) {
+ if (defined $bit) { # XXX Should we warn that this category isn't
+ # supported on this platform, or make it
+ # always be the C locale?
# Verify our assumption.
if (! ($bit >= 0 && $bit < 31)) {