Mercurial > emacs
diff leim/quail/hangul.el @ 20441:2db59cb96687
Require 'korea-util.
(quail-hangul-switch-to-symbol-ksc): Deleted.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 09 Dec 1997 04:18:08 +0000 |
| parents | f8074abd4bec |
| children | f6fd6bf625a7 |
line wrap: on
line diff
--- a/leim/quail/hangul.el Tue Dec 09 04:18:08 1997 +0000 +++ b/leim/quail/hangul.el Tue Dec 09 04:18:08 1997 +0000 @@ -25,12 +25,7 @@ ;;; Code: (require 'quail) - -(defun quail-hangul-switch-to-symbol-ksc (&rest ignore) - "Swith to `korean-symbol' package." - (quail-delete-region) - (activate-input-method "korean-symbol") - (throw 'quail-tag nil)) +(require 'korea-util) (quail-define-package "korean-hangul" "Korean" "$(CGQ(B2" @@ -60,8 +55,6 @@ nil t t nil nil nil t) (quail-define-rules - ("\\" quail-hangul-switch-to-symbol-ksc) - ("r" ?$(C$!(B) ("s" ?$(C$$(B) ("e" ?$(C$'(B)