diff options
| -rwxr-xr-x | perl-install/standalone/finish-install | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install index b269dd110..ead0b526b 100755 --- a/perl-install/standalone/finish-install +++ b/perl-install/standalone/finish-install @@ -39,6 +39,9 @@ sub ask_license() { sub ask_language() { require lang; $locale = lang::read(); + my ($lang) = cat_("/proc/cmdline") =~ /\blang=(.+?)\b/; + put_in_hash($locale, lang::lang_to_ourlocale($lang)) + if $lang && member($lang, lang::list_langs(exclude_non_installed => 1)); any::selectLanguage_and_more_standalone($in, $locale); lang::write_and_install($locale, $in->do_pkgs); } |