# HG changeset patch # User Richard M. Stallman # Date 1107413358 0 # Node ID f69e6bb9b8fcf0c933a5935a7ce674517c17e1ca # Parent d7da3e10bfef9550730ede6606e88b725134e3ed (hi-lock-mode): Turning on Hi-Lock turns on Font-Lock. diff -r d7da3e10bfef -r f69e6bb9b8fc lisp/hi-lock.el --- 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))