2022-12-16 11:25:43 +00:00
|
|
|
diff -up console-setup-1.212/Keyboard/ckbcomp.orig console-setup-1.212/Keyboard/ckbcomp
|
|
|
|
--- console-setup-1.212/Keyboard/ckbcomp.orig 2022-12-15 15:03:22.255192584 +0100
|
|
|
|
+++ console-setup-1.212/Keyboard/ckbcomp 2022-12-15 15:05:10.359083229 +0100
|
2018-06-28 10:11:30 +00:00
|
|
|
@@ -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
|
|
|
|
|
2021-03-10 09:28:27 +00:00
|
|
|
@@ -4376,9 +4372,6 @@ sub print_vector {
|
2018-06-28 10:11:30 +00:00
|
|
|
my $u = ord (uc (pack ("U", $v)));
|
|
|
|
my $c = ($v == $l ? $u : $l);
|
|
|
|
$capsvector[$mask] = $1 ."U+". sprintf ("%04x", $c);
|
2022-12-16 11:25:43 +00:00
|
|
|
- if ($v != $c && $v > 0x7f) {
|
2018-06-28 10:11:30 +00:00
|
|
|
- $broken_caps = 1;
|
|
|
|
- }
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if ($no_NoSymbol) {
|
2021-03-10 09:28:27 +00:00
|
|
|
@@ -4776,10 +4769,6 @@ keycode 127 =
|
2018-06-28 10:11:30 +00:00
|
|
|
die "$0: Unsupported keyboard type $arch\n";
|
|
|
|
}
|
|
|
|
|
|
|
|
-if ($broken_caps) {
|
|
|
|
- $KEYMAP =~ s/Caps_Lock/CtrlL_Lock/g;
|
|
|
|
-}
|
|
|
|
-
|
|
|
|
print $KEYMAP;
|
|
|
|
|
|
|
|
if ($freebsd) {
|