Final patches to the tools used to convert syscons keymaps for use with
vt. MFC after: 3 days
This commit is contained in:
parent
320098549a
commit
a8a11edaf8
@ -144,6 +144,6 @@ ISO8859-1 us.emacs.kbd us.emacs.kbd
|
||||
ISO8859-1 us.pc-ctrl.kbd us.ctrl.kbd
|
||||
ISO8859-1 us.unix.kbd us.unix.kbd
|
||||
|
||||
ISO8859-5 ua.iso5.kbd ua.kbd.from-iso5
|
||||
#ISO8859-5 ua.iso5.kbd ua.kbd.from-iso5
|
||||
KOI8-U ua.koi8-u.kbd ua.kbd
|
||||
KOI8-U ua.koi8-u.shift.alt.kbd ua.shift.alt.kbd
|
||||
|
@ -7,7 +7,7 @@ use strict;
|
||||
use utf8;
|
||||
|
||||
# command line parsing
|
||||
die "Usage: $0 filename.kbd CHARSET [EURO]"
|
||||
die "Usage: $0 filename.kbd charset [EURO|YEN]\n"
|
||||
unless ($ARGV[1]);
|
||||
|
||||
my $inputfile = shift; # first command argument
|
||||
@ -60,8 +60,8 @@ sub local_to_UCS_code
|
||||
$ucs_char = 0xa5 # replace with Jap. Yen character on PC kbd
|
||||
if $ucs_char == ord('\\') and $use_yen and $current_scancode == 125;
|
||||
|
||||
$ucs_char = 0xa5 # replace with Jap. Yen character on PC98x1 kbd
|
||||
if $ucs_char == ord('\\') and $use_yen and $current_scancode == 13;
|
||||
# $ucs_char = 0xa5 # replace with Jap. Yen character on PC98x1 kbd
|
||||
# if $ucs_char == ord('\\') and $use_yen and $current_scancode == 13;
|
||||
|
||||
return prettyprint_token($ucs_char);
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user