Title string of the input method

"korean-symbol" changed.  Require 'korea-util.
(quail-hangul-switch-back): Deleted.

diff --git a/leim/quail/symbol-ksc.el b/leim/quail/symbol-ksc.el
index ad0a758c15d3e1aa85af342340beb9fbc2720322..161028f484c2ca1dd8f87373a0778abf9b09be20 100644 (file)
--- a/leim/quail/symbol-ksc.el
+++ b/leim/quail/symbol-ksc.el
@@ -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" "\e$(CGQ1[=I9z@T7BG%\e(B" t
+ "korean-symbol" "Korean" "\e$(C=I9z\e(B" t
  "\e$(CGQ1[=I9z@T7BG%\e(B:
   \e$(C!<\e(B(\e$(C!=0}H#?-1b!<\e(Barrow\e$(C!=H-;l!<\e(Bsex\e$(C!=!N!O!<\e(Bindex\e$(C!=C7@Z\e(B  \e$(C!<\e(Baccent\e$(C!=>G<>F.\e(B
   \e$(C!<\e(B)\e$(C!=0}H#4]1b!<\e(Bmusic\e$(C!=@=>G!<\e(Bdot\e$(C!=A!\e(B  \e$(C!<\e(Bquote\e$(C!=5{?HG%!<\e(Bxtext\e$(C!=!W!X"R"."/\e(B
@@ -56,8 +50,6 @@
   \e$(C!<@Z<R!=\e(B2\e$(C9z=D\e(B + \e$(C$U\e(B(S) \e$(C$o\e(B(t_) \e$(C$p\e(B(DD) \e$(C$q\e(B(D) \e$(C$v\e(B(G) \e$(C$u\e(B(GG) \e$(C$}\e(B(uk)")
 
 (quail-define-rules
- ("\\" quail-hangul-switch-back)
-
  ("("  "\e$(C!2!4!6!8!:!<\e(B")
  (")"  "\e$(C!3!5!7!9!;!=\e(B")
  ("math"       "\e$(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\e(B")