diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-09-13 10:34:47 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-09-13 10:34:47 +0000 |
| commit | ede93e7faf703e6739cc7e743e8a937dab21987d (patch) | |
| tree | 15b01a196bfc9524f75ba8a4dd469ad090d54605 /perl-install | |
| parent | b4ccab7224afd572322ecc21b7192977c33590eb (diff) | |
| download | drakx-ede93e7faf703e6739cc7e743e8a937dab21987d.tar drakx-ede93e7faf703e6739cc7e743e8a937dab21987d.tar.gz drakx-ede93e7faf703e6739cc7e743e8a937dab21987d.tar.bz2 drakx-ede93e7faf703e6739cc7e743e8a937dab21987d.tar.xz drakx-ede93e7faf703e6739cc7e743e8a937dab21987d.zip | |
when upgrading and the keyboard config is wrong, write the unsafe config
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install2.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 1bb9537ec..8c1f58525 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -129,6 +129,9 @@ sub selectKeyboard { $o->{keyboard}{unsafe} or return; if (my $keyboard = keyboard::read()) { $o->{keyboard} = $keyboard; + } elsif ($o->{isUpgrade}) { + #- oops, the keyboard config is wrong, writing the unsafe config + addToBeDone { keyboard::write($o->{keyboard}) } 'installPackages'; } } 'formatPartitions'; } |