mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00
Code Issues Releases Activity

(setup-ethiopic-environment-internal):

Browse Source 
Use quail-activate-hook instead of obsolete hook quail-mode-hook.
(exit-ethiopic-environment): Likewize.
This commit is contained in:
Kenichi Handa 1999-06-14 07:16:21 +00:00
parent 58caa3809c
commit 2d1cc7d91e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/language/ethio-util.el
View File

@ -60,7 +60,7 @@
(global-set-key kb (cdr (car key-bindings))) (global-set-key kb (cdr (car key-bindings)))
(setq key-bindings (cdr 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 'find-file-hooks 'ethio-find-file)
(add-hook 'write-file-hooks 'ethio-write-file) (add-hook 'write-file-hooks 'ethio-write-file)
(add-hook 'after-save-hook 'ethio-find-file)) (add-hook 'after-save-hook 'ethio-find-file))
@ -73,7 +73,7 @@
(setq exit-ethiopic-environment-data (setq exit-ethiopic-environment-data
(cdr 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 'find-file-hooks 'ethio-find-file)
(remove-hook 'write-file-hooks 'ethio-write-file) (remove-hook 'write-file-hooks 'ethio-write-file)
(remove-hook 'after-save-hook 'ethio-find-file)) (remove-hook 'after-save-hook 'ethio-find-file))