diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-02-22 12:49:17 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-02-22 12:49:17 +0000 |
| commit | 95e34052c0875c208ff3455c478dc6585579cc1a (patch) | |
| tree | a25834a168d6ef5bfb14af3eb3ebdfe5e966618a /perl-install | |
| parent | 4e4525861adc83f9f2871fc0fc823b3494881157 (diff) | |
| download | drakx-95e34052c0875c208ff3455c478dc6585579cc1a.tar drakx-95e34052c0875c208ff3455c478dc6585579cc1a.tar.gz drakx-95e34052c0875c208ff3455c478dc6585579cc1a.tar.bz2 drakx-95e34052c0875c208ff3455c478dc6585579cc1a.tar.xz drakx-95e34052c0875c208ff3455c478dc6585579cc1a.zip | |
change the message
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/keyboard.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm index db38079e3..b93e41cab 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -499,13 +499,13 @@ sub check { !$_ || $keyboards{$_} or $err->("invalid keyboard $_ in \%usb2drakxkbd keyboard.pm") foreach values %usb2drakxkbd; my @xkb_groups = map { if_(/grp:(\S+)/, $1) } cat_('/usr/lib/X11/xkb/rules/xfree86.lst'); - $err->("unknown xkb group toggle '$_' in \%kbdgrptoggle") foreach difference2([ keys %kbdgrptoggle ], \@xkb_groups); + $err->("invalid xkb group toggle '$_' in \%kbdgrptoggle") foreach difference2([ keys %kbdgrptoggle ], \@xkb_groups); $warn->("unused xkb group toggle '$_'") foreach difference2(\@xkb_groups, [ keys %kbdgrptoggle ]); my @xkb_layouts = (#- (map { (split)[0] } grep { /^! layout/ .. /^\s*$/ } cat_('/usr/lib/X11/xkb/rules/xfree86.lst')), all('/usr/lib/X11/xkb/symbols'), (map { (split)[2] } cat_('/usr/lib/X11/xkb/symbols.dir'))); - $err->("unknown xkb layout $_") foreach difference2([ map { keyboard2xkb($_) } keyboards() ], \@xkb_layouts); + $err->("invalid xkb layout $_") foreach difference2([ map { keyboard2xkb($_) } keyboards() ], \@xkb_layouts); loadkeys_files($err); |