summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-04-03 12:10:20 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-04-03 12:10:20 +0000
commit13213676190222defa16e44cf6f4bc5a3a78e01d (patch)
tree370eb124ce597ac3186dc76c602d9ea06b8cad09
parent34bd4e9080f87b97be98ee29d509aa7e8f947c24 (diff)
downloaddrakx-backup-do-not-use-13213676190222defa16e44cf6f4bc5a3a78e01d.tar
drakx-backup-do-not-use-13213676190222defa16e44cf6f4bc5a3a78e01d.tar.gz
drakx-backup-do-not-use-13213676190222defa16e44cf6f4bc5a3a78e01d.tar.bz2
drakx-backup-do-not-use-13213676190222defa16e44cf6f4bc5a3a78e01d.tar.xz
drakx-backup-do-not-use-13213676190222defa16e44cf6f4bc5a3a78e01d.zip
(charset): fix for chineese which have charset in the name
-rw-r--r--perl-install/lang.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 59b481fae..7fae1fb8d 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -517,6 +517,7 @@ sub charset {
foreach (cat_("$prefix/usr/X11R6/lib/X11/locale/locale.alias")) {
/$l:\s+.*\.(\S+)/ and return $1;
}
+ $l =~ /.*\.(\S+)/ and return $1;
}
#-######################################################################################