Mercurial > emacs
diff lisp/epa.el @ 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 | ee5932bf781d |
| children | 73388588c9b4 |
line wrap: on
line diff
--- 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.