From 6cf2c8267ab5edaae01dbeca3ca9fefd9b2004d7 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Tue, 9 Dec 1997 04:18:08 +0000
Subject: [PATCH] Require 'korea-util. (quail-hangul-switch-to-symbol-ksc):
 Deleted.

---
 leim/quail/hangul.el  | 9 +--------
 leim/quail/hangul3.el | 9 +--------
 2 files changed, 2 insertions(+), 16 deletions(-)

diff --git a/leim/quail/hangul.el b/leim/quail/hangul.el
index 727eea29f19..f263b4a985a 100644
--- a/leim/quail/hangul.el
+++ b/leim/quail/hangul.el
@@ -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)
diff --git a/leim/quail/hangul3.el b/leim/quail/hangul3.el
index a0631c63e04..23e8e689565 100644
--- a/leim/quail/hangul3.el
+++ b/leim/quail/hangul3.el
@@ -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)
-- 
2.39.2