Commit 164edac8 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(encoded-kbd-iso2022-designation-map): Pay attention to that

charset-iso-final-char return -1 for eight-bit-control and
parent 49f93684
......@@ -70,11 +70,13 @@
(defvar encoded-kbd-iso2022-designation-map
(let ((map (make-sparse-keymap))
(l charset-list))
(l charset-list)
(while l
(define-key map
(char-to-string (charset-iso-final-char (car l)))
(setq final-char (charset-iso-final-char (car l)))
(if final-char
(define-key map (char-to-string final-char)
(setq l (cdr l)))
"Keymap for handling ISO2022 designation sequence in Encoded-kbd mode.")
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment