diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-08 22:09:29 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-08 22:09:29 +0000 |
commit | 7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9 (patch) | |
tree | 71e2baa4516d151f4462c692502a3a7dff5ef4df /perl-install/install2.pm | |
parent | dd9a661c53728a4ea265882a1029c9b323cd6d3c (diff) | |
download | drakx-7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9.tar drakx-7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9.tar.gz drakx-7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9.tar.bz2 drakx-7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9.tar.xz drakx-7fa65d931c24bd00a7d9ec9b26adaf7ad80023b9.zip |
language/country selection change:
- first install step is selection of your language, in your language;
it uses images for that
- language->country is probed, the selection of the country is possible
if there was a problem, in the Summary step
- in the $o big structure, we now use $o->{locale} which contains
three keys: lang, country and utf8
- lang.pm has been cleaned and rewritten a bit
- keyboard probing now done only on language (because this step is
at the beginning of the install)
- timezone probing done on country, if use changes country before
timezone in the Summary, re-probe timezone accordingly
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r-- | perl-install/install2.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 286f05c4a..b2aea0ecc 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -39,7 +39,7 @@ $o = $::o = { #- packages => [ qw() ], partitioning => { clearall => 0, eraseBadPartitions => 0, auto_allocate => 0 }, #-, readonly => 0 }, authentication => { md5 => 1, shadow => 1 }, - lang => 'en_US', + locale => { lang => 'en_US' }, #- isUpgrade => 0, toRemove => [], toSave => [], @@ -366,8 +366,8 @@ sub main { my ($n, $v) = @_; my $f = ${{ oem => sub { $::oem = $v }, - lang => sub { $o->{lang} = $v }, - flang => sub { $o->{lang} = $v; push @auto, 'selectLanguage' }, + lang => sub { $o->{locale}{lang} = $v }, + flang => sub { $o->{locale}{lang} = $v; push @auto, 'selectLanguage' }, method => sub { $o->{method} = $v }, pcmcia => sub { $o->{pcmcia} = $v }, vga16 => sub { $o->{vga16} = $v }, @@ -539,7 +539,7 @@ sub main { #- needed very early for install_steps_gtk eval { $o->{mouse} = mouse::detect() } if !$o->{nomouseprobe} && !$o->{mouse} && !$::testing; - $o->{lang} = lang::set($o->{lang}) if $o->{lang} ne 'en_US'; #- mainly for defcfg + $o->{locale}{lang} = lang::set($o->{locale}{lang}) if $o->{locale}{lang} ne 'en_US'; #- mainly for defcfg start_i810fb(); |