diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-03-15 10:31:05 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-03-15 10:31:05 +0000 |
commit | cd674185891ffc0d143d5dcbd525af73eb2c5ab0 (patch) | |
tree | f6a16c431708afb78ffb9997d0a6cee5ad5e3a20 | |
parent | f7379c17842aec187c238a6346688f6c63fa6514 (diff) | |
download | drakx-backup-do-not-use-cd674185891ffc0d143d5dcbd525af73eb2c5ab0.tar drakx-backup-do-not-use-cd674185891ffc0d143d5dcbd525af73eb2c5ab0.tar.gz drakx-backup-do-not-use-cd674185891ffc0d143d5dcbd525af73eb2c5ab0.tar.bz2 drakx-backup-do-not-use-cd674185891ffc0d143d5dcbd525af73eb2c5ab0.tar.xz drakx-backup-do-not-use-cd674185891ffc0d143d5dcbd525af73eb2c5ab0.zip |
(unpack_keyboards): return undef on error
-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 b28fa55b7..a9c81e1ee 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -327,7 +327,7 @@ sub loadkeys_files { } sub unpack_keyboards { - my ($k) = @_ or return; + my ($k) = @_; $k or return; [ grep { my $b = $keyboards{$_->[0]}; $b or log::l("bad keyboard $_->[0] in %keyboard::lang2keyboard"); |