Mercurial > emacs
changeset 24844:ab5f0d0f5e9a
(setup-ethiopic-environment-internal):
Use quail-activate-hook instead of obsolete hook quail-mode-hook.
(exit-ethiopic-environment): Likewize.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 14 Jun 1999 07:16:21 +0000 |
| parents | a555cf7d6f73 |
| children | 87e4cdfac07b |
| files | lisp/language/ethio-util.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/ethio-util.el Mon Jun 14 07:11:40 1999 +0000 +++ b/lisp/language/ethio-util.el Mon Jun 14 07:16:21 1999 +0000 @@ -60,7 +60,7 @@ (global-set-key kb (cdr (car key-bindings))) (setq key-bindings (cdr key-bindings)))) - (add-hook 'quail-mode-hook 'ethio-select-a-translation) + (add-hook 'quail-activate-hook 'ethio-select-a-translation) (add-hook 'find-file-hooks 'ethio-find-file) (add-hook 'write-file-hooks 'ethio-write-file) (add-hook 'after-save-hook 'ethio-find-file)) @@ -73,7 +73,7 @@ (setq exit-ethiopic-environment-data (cdr exit-ethiopic-environment-data))) - (remove-hook 'quail-mode-hook 'ethio-select-a-translation) + (remove-hook 'quail-activate-hook 'ethio-select-a-translation) (remove-hook 'find-file-hooks 'ethio-find-file) (remove-hook 'write-file-hooks 'ethio-write-file) (remove-hook 'after-save-hook 'ethio-find-file))