From fbefbe33e043d689289d1d623000ea1353b84928 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Tue, 10 Sep 2002 16:44:17 +0000
Subject: [PATCH] (occur-mode): Add font-lock-defontify to
 change-major-mode-hook.

---
 lisp/replace.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/replace.el b/lisp/replace.el
index 449d47e09b8..544f10ada91 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -489,6 +489,7 @@ Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it.
   (setq mode-name "Occur")
   (set (make-local-variable 'revert-buffer-function) 'occur-revert-function)
   (make-local-variable 'occur-revert-arguments)
+  (add-hook 'change-major-mode-hook 'font-lock-defontify nil t)
   (run-hooks 'occur-mode-hook))
 
 (defun occur-revert-function (ignore1 ignore2)
-- 
2.39.2