diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-03-01 17:56:32 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-03-01 17:56:32 +0000 |
commit | b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540 (patch) | |
tree | 5dc1c4376baac124b3c223da4d5a73292ce9a1d3 /perl-install/standalone | |
parent | 33e516ff5e432a1f76e2d965709c43f3c48fb33d (diff) | |
download | drakx-backup-do-not-use-b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540.tar drakx-backup-do-not-use-b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540.tar.gz drakx-backup-do-not-use-b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540.tar.bz2 drakx-backup-do-not-use-b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540.tar.xz drakx-backup-do-not-use-b4f6f62b291b9ef2ba4f93a4dfff791fd50c7540.zip |
restrict localedrake to installed lang
Diffstat (limited to 'perl-install/standalone')
-rw-r--r-- | perl-install/standalone/localedrake | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/standalone/localedrake b/perl-install/standalone/localedrake index b71f4cff7..fb17348e0 100644 --- a/perl-install/standalone/localedrake +++ b/perl-install/standalone/localedrake @@ -22,12 +22,11 @@ if ($klang) { #- help KDE defaulting to the right charset print lang::charset2kde_charset(lang::lang2charset($lang)), "\n"; } else { - my ($lang, $langs) = lang::read('', $>); + my ($lang) = lang::read('', $>); my $in = 'interactive'->vnew; - if ($lang = any::selectLanguage($in, $lang, $langs)) { + if ($lang = any::selectLanguage($in, $lang)) { lang::write('', $lang, $>); - lang::write_langs('', $langs) if $langs; if ($>) { if (my $wm = any::running_window_manager()) { $in->ask_okcancel('', _("The change is done, but to be effective you must logout"), 1) |