diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-11-26 12:16:10 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-11-26 12:16:10 +0000 |
| commit | 516aa0771a29adcfc96c386c27104bf5554e8dc4 (patch) | |
| tree | 05347942447ae4976e281a47c93fed38486eeb74 /perl-install/standalone | |
| parent | a47a4c19bebce17b299e89f459375530987da1ea (diff) | |
| download | drakx-backup-do-not-use-516aa0771a29adcfc96c386c27104bf5554e8dc4.tar drakx-backup-do-not-use-516aa0771a29adcfc96c386c27104bf5554e8dc4.tar.gz drakx-backup-do-not-use-516aa0771a29adcfc96c386c27104bf5554e8dc4.tar.bz2 drakx-backup-do-not-use-516aa0771a29adcfc96c386c27104bf5554e8dc4.tar.xz drakx-backup-do-not-use-516aa0771a29adcfc96c386c27104bf5554e8dc4.zip | |
don't write X config when there is none (otherwise we write a partial X config)
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/keyboarddrake | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/standalone/keyboarddrake b/perl-install/standalone/keyboarddrake index cef005041..10352b2b5 100755 --- a/perl-install/standalone/keyboarddrake +++ b/perl-install/standalone/keyboarddrake @@ -38,9 +38,11 @@ if ($::expert) { keyboard::setxkbmap($keyboard); eval { my $xfree_conf = Xconfig::xfree->read; - my $xkb = keyboard::keyboard2full_xkb($keyboard); - $xfree_conf->set_keyboard($xkb); - $xfree_conf->write; + if (!is_empty_array_ref($xfree_conf)) { + my $xkb = keyboard::keyboard2full_xkb($keyboard); + $xfree_conf->set_keyboard($xkb); + $xfree_conf->write; + } }; keyboard::write($keyboard); |