diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-08-21 20:14:51 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-08-21 20:14:51 +0000 |
commit | e15e62ac8668e3538ef9bdc9cc5193c5debb1af4 (patch) | |
tree | eb7039c15e0739345d46d2e8c5a3f71306a7e980 /perl-install | |
parent | ce54d2b72894b33edbd71cc420add3e22a826053 (diff) | |
download | drakx-e15e62ac8668e3538ef9bdc9cc5193c5debb1af4.tar drakx-e15e62ac8668e3538ef9bdc9cc5193c5debb1af4.tar.gz drakx-e15e62ac8668e3538ef9bdc9cc5193c5debb1af4.tar.bz2 drakx-e15e62ac8668e3538ef9bdc9cc5193c5debb1af4.tar.xz drakx-e15e62ac8668e3538ef9bdc9cc5193c5debb1af4.zip |
*** empty log message ***
Diffstat (limited to 'perl-install')
-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 8d8797ee2..ac49df2f6 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -529,7 +529,7 @@ sub check { $err->("invalid xkb layout $_") foreach difference2([ map { keyboard2xkb($_) } keyboards() ], \@xkb_layouts); my @kmaps_available = map { if_(m|.*/(.*)\.bkmap|, $1) } `tar tfj share/keymaps.tar.bz2`; - my @kmaps_wanted = map { keyboard2kmap($_) } keyboard::keyboards(); + my @kmaps_wanted = map { keyboard2kmap($_) } keyboards(); $err->("missing KEYTABLE $_ (either share/keymaps.tar.bz2 need updating or $_ is bad)") foreach difference2(\@kmaps_wanted, \@kmaps_available); $err->("unused KEYTABLE $_ (update share/keymaps.tar.bz2 using share/keymaps_generate)") foreach difference2(\@kmaps_available, \@kmaps_wanted); |