changeset 59873:f69e6bb9b8fc

(hi-lock-mode): Turning on Hi-Lock turns on Font-Lock.
author Richard M. Stallman <rms@gnu.org>
date Thu, 03 Feb 2005 06:49:18 +0000
parents d7da3e10bfef
children 134cd8afb3e7
files lisp/hi-lock.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/hi-lock.el	Thu Feb 03 06:47:16 2005 +0000
+++ b/lisp/hi-lock.el	Thu Feb 03 06:49:18 2005 +0000
@@ -294,6 +294,10 @@
     (when (and (not hi-lock-mode-prev) hi-lock-mode)
       (add-hook 'find-file-hooks 'hi-lock-find-file-hook)
       (add-hook 'font-lock-mode-hook 'hi-lock-font-lock-hook)
+      (when (eq nil font-lock-defaults)
+	(setq font-lock-defaults '(nil)))
+      (unless font-lock-mode
+	(font-lock-mode 1))
       (define-key-after menu-bar-edit-menu [hi-lock]
         (cons "Regexp Highlighting" hi-lock-menu))
       (dolist (buffer (buffer-list))