diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-01-23 14:10:34 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-01-23 14:10:34 +0000 |
commit | 2d896c9aef5a1d20790a03835c1b13cb2c23c0f0 (patch) | |
tree | e24a57d8098f395531161290743bfb8ebd9d7a84 | |
parent | c70e56839df5a0942c00cb29707db1a2e021cf00 (diff) | |
download | drakx-backup-do-not-use-2d896c9aef5a1d20790a03835c1b13cb2c23c0f0.tar drakx-backup-do-not-use-2d896c9aef5a1d20790a03835c1b13cb2c23c0f0.tar.gz drakx-backup-do-not-use-2d896c9aef5a1d20790a03835c1b13cb2c23c0f0.tar.bz2 drakx-backup-do-not-use-2d896c9aef5a1d20790a03835c1b13cb2c23c0f0.tar.xz drakx-backup-do-not-use-2d896c9aef5a1d20790a03835c1b13cb2c23c0f0.zip |
(read): fix return value when no configured keyboard is found
-rw-r--r-- | perl-install/keyboard.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm index a1c13f9a4..fdd25f662 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -503,7 +503,7 @@ sub write { } sub read { - my %keyboard = getVarsFromSh("$::prefix/etc/sysconfig/keyboard") or return {}; + my %keyboard = getVarsFromSh("$::prefix/etc/sysconfig/keyboard") or return; if (!$keyboard{KEYBOARD}) { add2hash(\%keyboard, grep { keyboard2kmap($_) eq $keyboard{KEYTABLE} } keyboards()); } |