X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Flocale.pm;h=a51e2b1c097582b4b46fe208bbbc1d8109acaa54;hb=aa10195b3aa19bb4f167204cdce8fb75d361ccb8;hp=6314aca59e57861689ffbdd9f9343b8bef56919a;hpb=d5448623582779336009dd8bafd91e2a4ca7c599;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/locale.pm b/lib/locale.pm
index 6314aca..a51e2b1 100644
--- a/lib/locale.pm
+++ b/lib/locale.pm
@@ -1,5 +1,7 @@
 package locale;
 
+our $VERSION = '1.00';
+
 =head1 NAME
 
 locale - Perl pragma to use and avoid POSIX locales for built-in operations
@@ -25,7 +27,7 @@ locales.
 
 =cut
 
-$locale::hint_bits = 0x800;
+$locale::hint_bits = 0x4;
 
 sub import {
     $^H |= $locale::hint_bits;