# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1117112937 0
# Node ID f5aef2123438d0fa9bd392b25c2683aef62ac75a
# Parent  76864fc0acf0fae410495ae8866b458e16d6cc2d
(occur-mode): Use run-mode-hooks.

diff -r 76864fc0acf0 -r f5aef2123438 lisp/replace.el
--- a/lisp/replace.el	Thu May 26 13:07:46 2005 +0000
+++ b/lisp/replace.el	Thu May 26 13:08:57 2005 +0000
@@ -693,7 +693,7 @@
   (make-local-variable 'occur-revert-arguments)
   (add-hook 'change-major-mode-hook 'font-lock-defontify nil t)
   (setq next-error-function 'occur-next-error)
-  (run-hooks 'occur-mode-hook))
+  (run-mode-hooks 'occur-mode-hook))
 
 (defun occur-revert-function (ignore1 ignore2)
   "Handle `revert-buffer' for Occur mode buffers."