Make Term::ReadLine::findConsole fall back to STDIN if /dev/tty can't be opened

[p5sagit/p5-mst-13.2.git] / lib / locale.pm

diff --git a/lib/locale.pm b/lib/locale.pm
index 3e5054c..a51e2b1 100644 (file)
--- a/lib/locale.pm
+++ b/lib/locale.pm
@@ -27,7 +27,7 @@ locales.
 
 =cut
 
-$locale::hint_bits = 0x800;
+$locale::hint_bits = 0x4;
 
 sub import {
     $^H |= $locale::hint_bits;