Mercurial > emacs
changeset 95501:eb08bb46487b
Register input methods "korean-hangul",
"korean-hangul3f", "korean-hangul390", and "korean-hangul3".
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 03 Jun 2008 05:01:15 +0000 |
| parents | ad9123bca9ed |
| children | 48afc4995a5c |
| files | leim/leim-ext.el |
| diffstat | 1 files changed, 41 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/leim/leim-ext.el Tue Jun 03 05:00:53 2008 +0000 +++ b/leim/leim-ext.el Tue Jun 03 05:01:15 2008 +0000 @@ -48,4 +48,45 @@ (register-input-method "ucs" "UTF-8" 'ucs-input-activate "U+" "Unicode input as hex in the form Uxxxx.") +(autoload 'hangul-input-method-activate "quail/hangul" + "Activate Hangul input method INPUT-METHOD. +FUNC is a function to handle input key. +HELP-TEXT is a text set in `hangul-input-method-help-text'.") + +(register-input-method + "korean-hangul" + "UTF-8" + 'hangul-input-method-activate + "$(CGQ(B2" + "Hangul 2-Bulsik Input" + 'hangul2-input-method + "Input method: korean-hangul2 (mode line indicator:$(CGQ(B2)\n\nHangul 2-Bulsik input method.") + +(register-input-method + "korean-hangul3f" + "UTF-8" + 'hangul-input-method-activate + "$(CGQ(B3f" + "Hangul 3-Bulsik final Input" + 'hangul3-input-method + "Input method: korean-hangul3 (mode line indicator:$(CGQ(B3f)\n\nHangul 3-Bulsik final input method.") + +(register-input-method + "korean-hangul390" + "UTF-8" + 'hangul-input-method-activate + "$(CGQ(B390" + "Hangul 3-Bulsik 390 Input" + 'hangul390-input-method + "Input method: korean-hangul390 (mode line indicator:$(CGQ(B390)\n\nHangul 3-Bulsik 390 input method.") + +(register-input-method + "korean-hangul3" + "UTF-8" + 'hangul-input-method-activate + "$(CGQ(B390" + "Hangul 3-Bulsik 390 Input" + 'hangul390-input-method + "Input method: korean-hangul390 (mode line indicator:$(CGQ(B390)\n\nHangul 3-Bulsik 390 input method.") + ;; arch-tag: 75cfdfc7-de85-44f9-b408-ff67d1ec664e