fix warning when no LANG/LC_MESSAGES
[clawsker.git] / clawsker
index c9e1383..e7b56a8 100755 (executable)
--- a/clawsker
+++ b/clawsker
@@ -87,6 +87,7 @@ my $VERBOSE = FALSE;
 my $main_window = undef;
 
 my $locale = (defined($ENV{LC_MESSAGES}) ? $ENV{LC_MESSAGES} : $ENV{LANG});
+$locale = "C" unless defined($locale);
 setlocale (LC_ALL, $locale);
 bindtextdomain ($NAME, sprintf ('%s/share/locale', $PREFIX));
 textdomain ($NAME);