diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-04-03 12:10:20 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-04-03 12:10:20 +0000 |
| commit | 13213676190222defa16e44cf6f4bc5a3a78e01d (patch) | |
| tree | 370eb124ce597ac3186dc76c602d9ea06b8cad09 /perl-install/lang.pm | |
| parent | 34bd4e9080f87b97be98ee29d509aa7e8f947c24 (diff) | |
| download | drakx-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
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 1 |
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; } #-###################################################################################### |