Mercurial > emacs
changeset 96760:b056a93eb26f
(epa-key-list-mode): Use run-mode-hooks.
(epa-key-mode): Ditto.
(epa-info-mode): Ditto.
| author | Daiki Ueno <ueno@unixuser.org> |
|---|---|
| date | Thu, 17 Jul 2008 06:21:14 +0000 |
| parents | 1e2f7aab70ba |
| children | b117e2fe7552 |
| files | lisp/ChangeLog lisp/epa.el |
| diffstat | 2 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Jul 17 03:33:59 2008 +0000 +++ b/lisp/ChangeLog Thu Jul 17 06:21:14 2008 +0000 @@ -1,3 +1,9 @@ +2008-07-17 Daiki Ueno <ueno@unixuser.org> + + * epa.el (epa-key-list-mode): Use run-mode-hooks. + (epa-key-mode): Ditto. + (epa-info-mode): Ditto. + 2008-07-17 Glenn Morris <rgm@gnu.org> * term/ns-win.el (ns-handle-switch): Simplify. Handle the numeric case.
--- a/lisp/epa.el Thu Jul 17 03:33:59 2008 +0000 +++ b/lisp/epa.el Thu Jul 17 06:21:14 2008 +0000 @@ -327,7 +327,7 @@ (make-local-variable 'epa-exit-buffer-function) (make-local-variable 'revert-buffer-function) (setq revert-buffer-function 'epa--key-list-revert-buffer) - (run-hooks 'epa-key-list-mode-hook)) + (run-mode-hooks 'epa-key-list-mode-hook)) (defun epa-key-mode () "Major mode for a key description." @@ -344,7 +344,7 @@ ;; if buffer-file-name is not set. (font-lock-set-defaults) (make-local-variable 'epa-exit-buffer-function) - (run-hooks 'epa-key-mode-hook)) + (run-mode-hooks 'epa-key-mode-hook)) (defun epa-info-mode () "Major mode for `epa-info-buffer'." @@ -355,7 +355,7 @@ truncate-lines t buffer-read-only t) (use-local-map epa-info-mode-map) - (run-hooks 'epa-info-mode-hook)) + (run-mode-hooks 'epa-info-mode-hook)) (defun epa-mark-key (&optional arg) "Mark a key on the current line.