From e15e62ac8668e3538ef9bdc9cc5193c5debb1af4 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 21 Aug 2002 20:14:51 +0000 Subject: *** empty log message *** --- perl-install/keyboard.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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); -- cgit v1.2.1