procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Prefer defvar-keymap in hangul.el

Browse source 
* lisp/leim/quail/hangul.el (hangul-im-keymap): Convert to
defvar-keymap.
This commit is contained in:
Stefan Kangas 2024-12-20 00:01:24 +01:00
parent c19dd8e9d6
commit f0d7a395ea
1 changed files with 5 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lisp/leim/quail/hangul.el
View file

@ -86,13 +86,11 @@
65 83 90 109 115 87 116 122 113 118 121 21 66 4 69 99 73 9 1 101 17
123 124 125 126])
(defvar hangul-im-keymap
(let ((map (make-sparse-keymap)))
(define-key map "\d" #'hangul-delete-backward-char)
(define-key map [f9] #'hangul-to-hanja-conversion)
(define-key map [Hangul_Hanja] #'hangul-to-hanja-conversion)
map)
"Keymap for Hangul method. It is used by all Hangul input methods.")
(defvar-keymap hangul-im-keymap
:doc "Keymap for Hangul method. It is used by all Hangul input methods."
"DEL" #'hangul-delete-backward-char
"<f9>" #'hangul-to-hanja-conversion
"<Hangul_Hanja>" #'hangul-to-hanja-conversion)
;; Current input character buffer. Store separated hangul character.
;; The first and second are Choseong position.