Commit 6cf2c826 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

Require 'korea-util.

(quail-hangul-switch-to-symbol-ksc): Deleted.
parent 8154bdfa
......@@ -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 @@ For instance, typing \"S\" followed by TAB will tell you
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)
......
......@@ -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-hangul3" "Korean" "$(CGQ(B3"
......@@ -72,8 +67,6 @@
nil t t)
(quail-define-rules
("\\" quail-hangul-switch-to-symbol-ksc)
("k" ?$(C$!(B)
("kk" ?$(C$"(B)
("h" ?$(C$$(B)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment