d/freebsd-skq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Minor fixes to convert-keymap.pl (conversion of 8bit characters in the form

Browse Source 
'x' with high bit set) and to KBDFILES.map (fix encodings and comment out a
few redundant keymap files).

MFC after:	3 days
This commit is contained in:
se 2014-08-18 20:55:11 +00:00
parent 21285cbfcd
commit 8b955bac57
2 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
tools/tools/vt/keymaps/KBDFILES.map
View File

@ -6,13 +6,13 @@ ISO8859-15 be.iso.acc.kbd be.acc.kbd
ISO8859-5 bg.bds.ctrlcaps.kbd bg.bds.kbd
ISO8859-5 bg.phonetic.ctrlcaps.kbd bg.bds.ctrlcaps.kbd
ISO8859-1 br275.iso.kbd br.kbd
ISO8859-1 br275.iso.acc.kbd br.acc.kbd
CP850 br275.cp850.kbd br.kbd.from-cp850
#ISO8859-1 br275.iso.kbd br.kbd.from-iso1 (only AltGr-Shift-6 differs from CP850)
ISO8859-1 br275.iso.acc.kbd br.kbd
CP850 br275.cp850.kbd br.noacc.kbd
CP1131 by.cp1131.kbd by.kbd.from-cp1131
CP1251 by.cp1251.kbd by.kbd.from-cp1251
ISO8859-5 by.iso5.kbd by.kbd.from-iso5
#CP1131 by.cp1131.kbd by.kbd.from-cp1131 (Shift-3 not OK)
#CP1251 by.cp1251.kbd by.kbd.from-cp1251 (result identical to CP1251)
ISO8859-5 by.iso5.kbd by.kbd
ISO8859-2 ce.iso2.kbd centraleuropean.kbd
@ -119,11 +119,11 @@ ISO8859-1 swissgerman.macbook.acc.kbd ch.macbook.acc.kbd
ISO8859-9 tr.iso9.q.kbd tr.kbd
ISO8859-1 uk.iso.kbd uk.kbd
ISO8859-1 uk.iso-ctrl.kbd uk.capsctrl.kbd
CP850 uk.cp850.kbd uk.kbd.from-cp850
CP850 uk.cp850-ctrl.kbd uk.capsctrl.kbd.from-cp850
ISO8859-1 uk.dvorak.kbd uk.dvorak.kbd
ISO8859-15 uk.iso.kbd uk.kbd
ISO8859-15 uk.iso-ctrl.kbd uk.capsctrl.kbd
#CP850 uk.cp850.kbd uk.kbd.from-cp850 (no ¤ and different Alt/Alt-Shift encodings)
#CP850 uk.cp850-ctrl.kbd uk.capsctrl.kbd.from-cp850 (no ¤ and different Alt/Alt-Shift encodings)
ISO8859-15 uk.dvorak.kbd uk.dvorak.kbd
ISO8859-1 us.iso.kbd us.kbd
ISO8859-1 us.iso.acc.kbd us.acc.kbd

2
tools/tools/vt/keymaps/convert-keymap.pl
View File

@ -46,7 +46,7 @@ sub convert_token
if $C =~ m/^(\d+)$/; # decimal number
return local_to_UCS_code(chr(hex($1)))
if $C =~ m/^0x([0-9a-f]+)$/i; # hex number
return local_to_UCS_code($1)
return local_to_UCS_code(chr(ord($1)))
if $C =~ m/^'(.)'$/; # character
return "<?$C?>"; # uncovered case
}