diff options
| -rw-r--r-- | lisp/hi-lock.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el index 99eeb698171..81c7296760f 100644 --- a/lisp/hi-lock.el +++ b/lisp/hi-lock.el | |||
| @@ -294,6 +294,10 @@ is found. A mode is excluded if it's in the list `hi-lock-exclude-modes'." | |||
| 294 | (when (and (not hi-lock-mode-prev) hi-lock-mode) | 294 | (when (and (not hi-lock-mode-prev) hi-lock-mode) |
| 295 | (add-hook 'find-file-hooks 'hi-lock-find-file-hook) | 295 | (add-hook 'find-file-hooks 'hi-lock-find-file-hook) |
| 296 | (add-hook 'font-lock-mode-hook 'hi-lock-font-lock-hook) | 296 | (add-hook 'font-lock-mode-hook 'hi-lock-font-lock-hook) |
| 297 | (when (eq nil font-lock-defaults) | ||
| 298 | (setq font-lock-defaults '(nil))) | ||
| 299 | (unless font-lock-mode | ||
| 300 | (font-lock-mode 1)) | ||
| 297 | (define-key-after menu-bar-edit-menu [hi-lock] | 301 | (define-key-after menu-bar-edit-menu [hi-lock] |
| 298 | (cons "Regexp Highlighting" hi-lock-menu)) | 302 | (cons "Regexp Highlighting" hi-lock-menu)) |
| 299 | (dolist (buffer (buffer-list)) | 303 | (dolist (buffer (buffer-list)) |