Commit 7678db25 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

Don't add hook to quail-mode-hook.

(ethio-select-a-translation): New function.
parent 1ca07425
......@@ -1026,16 +1026,11 @@ C-' or `M-x ethio-gemination'
("`1000000" ["$(3%$%%(B"])
)
(add-hook 'quail-mode-hook
(lambda nil
(if (not (string= (quail-name) "ethiopic"))
nil
;; Also turn on the Ethio minor mode.
(ethio-mode 1)
;; The translation of `a' depends on the language
;; (either Tigrigna or Amharic).
(quail-defrule "a"
(if (ethio-prefer-amharic-p) ?$(3"c(B ?$(3"f(B)
"ethiopic"))))
(defun ethio-select-a-translation ()
;; The translation of `a' depends on the language
;; (either Tigrigna or Amharic).
(quail-defrule "a"
(if (ethio-prefer-amharic-p) ?$(3"c(B ?$(3"f(B)
"ethiopic"))
;;; quail/ethiopic.el ends here
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