aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/hi-lock.el
diff options
context:
space:
mode:
authorChong Yidong <[email protected]>2005-11-24 21:05:33 +0000
committerChong Yidong <[email protected]>2005-11-24 21:05:33 +0000
commitae34cba19b587572dcdf7f3a42f6f2666216c5d9 (patch)
treea9bce290bd0bcf7443605a7352697d2190a016c9 /lisp/hi-lock.el
parent963b20402dd726ecdf6747c91391e60e36b056fe (diff)
Fix two omissions in last change.
Diffstat (limited to 'lisp/hi-lock.el')
-rw-r--r--lisp/hi-lock.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index ceb8900f94..c477b6d85a 100644
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -297,7 +297,7 @@ is found. A mode is excluded if it's in the list `hi-lock-exclude-modes'."
(when hi-lock-file-patterns
(font-lock-remove-keywords nil hi-lock-file-patterns)
(setq hi-lock-file-patterns nil))
- (if font-lock-mode (hi-lock-refontify))
+ (hi-lock-refontify)
(define-key-after menu-bar-edit-menu [hi-lock] nil)
(remove-hook 'font-lock-mode-hook 'hi-lock-font-lock-hook t)))
@@ -516,8 +516,8 @@ not suitable."
(defun hi-lock-refontify ()
"Unfontify then refontify buffer. Used when hi-lock patterns change."
(interactive)
- (unless font-lock-mode (font-lock-mode 1))
- (font-lock-fontify-buffer))
+ (if font-lock-mode
+ (font-lock-fontify-buffer)))
(defun hi-lock-find-patterns ()
"Find patterns in current buffer for hi-lock."