diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-01-31 15:10:34 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-01-31 15:10:34 +0000 |
| commit | 8564afc9ab6fe00152c3217fec6f85924f0b2620 (patch) | |
| tree | 73ce588e35ea17985fbea7a0352546447a15c5f4 /lisp/hi-lock.el | |
| parent | ee5cece023d3c0917221f7069378667a9644d88e (diff) | |
| download | emacs-8564afc9ab6fe00152c3217fec6f85924f0b2620.tar.gz | |
(hi-lock-mode, hi-lock-line-face-buffer): Doc fix.
(hi-lock-find-patterns): Turn on font-lock-mode, if it is not
on already.
Diffstat (limited to 'lisp/hi-lock.el')
| -rw-r--r-- | lisp/hi-lock.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el index e856e7e95d7..22ae9e7afb2 100644 --- a/lisp/hi-lock.el +++ b/lisp/hi-lock.el @@ -1,6 +1,6 @@ ;;; hi-lock.el --- Minor mode for interactive automatic highlighting. -;; Copyright (C) 2000 Free Software Foundation, Inc. +;; Copyright (C) 2000, 2001 Free Software Foundation, Inc. ;; Author: David M. Koppelman, koppel@ee.lsu.edu ;; Keywords: faces, minor-mode, matching, display @@ -243,7 +243,7 @@ calls." "Toggle minor mode for interactively adding font-lock highlighting patterns. If ARG positive turn hi-lock on. Issuing a hi-lock command will also -turn hi-lock on. When hi-lock turned on an \"Automatic Highlighting\" +turn hi-lock on. When hi-lock is turned on an \"Automatic Highlighting\" submenu is added to the \"Edit\" menu. The commands in the submenu, which can be called interactively, are: @@ -308,7 +308,7 @@ is found. A mode is excluded if it's in the list `hi-lock-exclude-modes'." Interactively, prompt for REGEXP then FACE. Buffer-local history list maintained for regexps, global history maintained for faces. \\<minibuffer-local-map>Use \\[next-history-element] and \\[previous-history-element] to retrieve next or previous history item. -(See info node `Minibuffer History')" +\(See info node `Minibuffer History')" (interactive (list (hi-lock-regexp-okay @@ -330,7 +330,7 @@ list maintained for regexps, global history maintained for faces. Interactively, prompt for REGEXP then FACE. Buffer-local history list maintained for regexps, global history maintained for faces. \\<minibuffer-local-map>Use \\[next-history-element] and \\[previous-history-element] to retrieve next or previous history item. -(See info node `Minibuffer History')" +\(See info node `Minibuffer History')" (interactive (list (hi-lock-regexp-okay @@ -514,6 +514,7 @@ Optional argument END is maximum excursion." (setq all-patterns (append patterns all-patterns)))))) (if (and (not hi-lock-mode) all-patterns) (hi-lock-mode 1)) + (unless font-lock-mode (font-lock-mode)) (if hi-lock-mode (hi-lock-set-file-patterns all-patterns)) (if (interactive-p) (message (format "Hi-lock added %d patterns." (length all-patterns))))))) |