From 4baf56205b483c0d19da33251fb1772373375227 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 11 Nov 1993 02:48:26 +0000 Subject: [PATCH] (occur-mode): Run occur-mode-hook. --- lisp/replace.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/replace.el b/lisp/replace.el index 0b0e56df2fe..b8bf0648c24 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -227,7 +227,8 @@ in the buffer that the occurrences were found in. (setq mode-name "Occur") (make-local-variable 'occur-buffer) (make-local-variable 'occur-nlines) - (make-local-variable 'occur-pos-list)) + (make-local-variable 'occur-pos-list) + (run-hooks 'occur-mode-hook)) (defun occur-mode-goto-occurrence () "Go to the line this occurrence was found in, in the buffer it was found in." -- 2.39.5