# HG changeset patch
# User Daiki Ueno <ueno@unixuser.org>
# Date 1216275674 0
# Node ID b056a93eb26f73f5776c7deaf48c300a4f6e2ccd
# Parent  1e2f7aab70baa2a88905b8091d9040b24f0b7fc8
(epa-key-list-mode): Use run-mode-hooks.
(epa-key-mode): Ditto.
(epa-info-mode): Ditto.

diff -r 1e2f7aab70ba -r b056a93eb26f lisp/ChangeLog
--- 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.
diff -r 1e2f7aab70ba -r b056a93eb26f lisp/epa.el
--- 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.