diff options
author | Mystery Man <unknown@mandriva.org> | 2002-08-05 15:51:48 +0000 |
---|---|---|
committer | Mystery Man <unknown@mandriva.org> | 2002-08-05 15:51:48 +0000 |
commit | 60a32f602c51495953e8f5db7ff42704a939caca (patch) | |
tree | e5927f165ceb0e00e0067ed53ac00bcfb6ef4a80 /perl-install/share/gen_locales.pl | |
parent | f40f7286b31daab17a4db329040e543f830d3175 (diff) | |
download | drakx-backup-do-not-use-60a32f602c51495953e8f5db7ff42704a939caca.tar drakx-backup-do-not-use-60a32f602c51495953e8f5db7ff42704a939caca.tar.gz drakx-backup-do-not-use-60a32f602c51495953e8f5db7ff42704a939caca.tar.bz2 drakx-backup-do-not-use-60a32f602c51495953e8f5db7ff42704a939caca.tar.xz drakx-backup-do-not-use-60a32f602c51495953e8f5db7ff42704a939caca.zip |
This commit was manufactured by cvs2svn to create tag 'V1_1_9_5mdk'.V1_1_9_5mdk
Diffstat (limited to 'perl-install/share/gen_locales.pl')
-rw-r--r-- | perl-install/share/gen_locales.pl | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/perl-install/share/gen_locales.pl b/perl-install/share/gen_locales.pl deleted file mode 100644 index ba0f4784e..000000000 --- a/perl-install/share/gen_locales.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/perl - -use MDK::Common; -use lang; - -foreach (lang::list()) { - my $LANG = lang::lang2LANG($_); - - my $c = lang::during_install__lang2charset($_) or next; - -e "usr/share/locale/$c" or warn("not handled language $_ ($LANG, $c)\n"), next; - if (my $exist = readlink "usr/share/locale/$LANG") { - $exist eq $c or die "symlink $LANG already exist and is $exist instead of $c\n"; - } else { - symlink $c, "usr/share/locale/$LANG" or die "can't create symlink $LANG (for $_)"; - } -} |