Mercurial > emacs
changeset 20438:1c8c81e873ac
Title string of the input method
"korean-symbol" changed. Require 'korea-util.
(quail-hangul-switch-back): Deleted.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 09 Dec 1997 04:18:08 +0000 |
| parents | f173ebdb6be2 |
| children | 5ccdbbb69483 |
| files | leim/quail/symbol-ksc.el |
| diffstat | 1 files changed, 2 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/leim/quail/symbol-ksc.el Tue Dec 09 04:16:20 1997 +0000 +++ b/leim/quail/symbol-ksc.el Tue Dec 09 04:18:08 1997 +0000 @@ -30,16 +30,10 @@ ;;; Code: (require 'quail) - -(defun quail-hangul-switch-back (key idx) - (if (not input-method-history) - (toggle-input-method t) - (quail-delete-region) - (activate-input-method (car input-method-history))) - (throw 'quail-tag nil)) +(require 'korea-util) (quail-define-package - "korean-symbol" "Korean" "$(CGQ1[=I9z@T7BG%(B" t + "korean-symbol" "Korean" "$(C=I9z(B" t "$(CGQ1[=I9z@T7BG%(B: $(C!<(B($(C!=0}H#?-1b!<(Barrow$(C!=H-;l!<(Bsex$(C!=!N!O!<(Bindex$(C!=C7@Z(B $(C!<(Baccent$(C!=>G<>F.(B $(C!<(B)$(C!=0}H#4]1b!<(Bmusic$(C!=@=>G!<(Bdot$(C!=A!(B $(C!<(Bquote$(C!=5{?HG%!<(Bxtext$(C!=!W!X"R"."/(B @@ -56,8 +50,6 @@ $(C!<@Z<R!=(B2$(C9z=D(B + $(C$U(B(S) $(C$o(B(t_) $(C$p(B(DD) $(C$q(B(D) $(C$v(B(G) $(C$u(B(GG) $(C$}(B(uk)") (quail-define-rules - ("\\" quail-hangul-switch-back) - ("(" "$(C!2!4!6!8!:!<(B") (")" "$(C!3!5!7!9!;!=(B") ("math" "$(C!>!?!@!A!B!C!D!E!P!Q!R!S!T!U!V!k!l!m!n!o!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~"""#"$"1"2"3(B")