console-setup/console-setup-1.84-ctrll-lock.patch
2021-03-10 10:28:27 +01:00

36 lines
1.1 KiB
Diff

diff -up console-setup-1.201/Keyboard/ckbcomp.orig console-setup-1.201/Keyboard/ckbcomp
--- console-setup-1.201/Keyboard/ckbcomp.orig 2021-03-10 09:35:05.639847205 +0100
+++ console-setup-1.201/Keyboard/ckbcomp 2021-03-10 09:35:05.641847229 +0100
@@ -196,10 +196,6 @@ my %acmtable; # Unicode -> legacy code (
my $KEYMAP = ''; # This variable contains the generated keymap
-my $broken_caps = 0; # In unicode mode Caps_Lock doesn't work for non-ASCII
- # letters. 1 = the keymap contains non-ascii letters.
- # See http://bugzilla.kernel.org/show_bug.cgi?id=7746#c21
-
my %keycodes_table; # x keysym -> x key code
my %aliases; # x keysym -> x keysym
@@ -4376,9 +4372,6 @@ sub print_vector {
my $u = ord (uc (pack ("U", $v)));
my $c = ($v == $l ? $u : $l);
$capsvector[$mask] = $1 ."U+". sprintf ("%04x", $c);
- if ($v != $c && $v gt 0x7f) {
- $broken_caps = 1;
- }
}
}
if ($no_NoSymbol) {
@@ -4776,10 +4769,6 @@ keycode 127 =
die "$0: Unsupported keyboard type $arch\n";
}
-if ($broken_caps) {
- $KEYMAP =~ s/Caps_Lock/CtrlL_Lock/g;
-}
-
print $KEYMAP;
if ($freebsd) {