summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 835dd455b36..2785960538b 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -49,7 +49,7 @@ if (defined($::opt_lang)) {
require POSIX;
import POSIX qw/locale_h/;
# now we try to deduce $::lang
- my $loc = setlocale(&POSIX::LC_CTYPE);
+ my $loc = setlocale(&POSIX::LC_MESSAGES);
my ($lang,$area,$codeset);
if ($loc =~ m/^([^_.]*)(_([^.]*))?(\.([^@]*))?(@.*)?$/) {
$lang = defined($1)?$1:"";