From 7ca949b7ef9f1efbeaccd459f8ef49cd971b8e8c Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 4 Sep 2021 09:11:37 +0200 Subject: [PATCH] Tweak hi-lock-mode doc string * lisp/hi-lock.el (hi-lock-mode): Tweak the doc string so that running hi-lock-mode in a *Help* buffer showing this help text won't issue an error (bug#20977). --- lisp/hi-lock.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el index 37b88b318de..4c924e9d52a 100644 --- a/lisp/hi-lock.el +++ b/lisp/hi-lock.el @@ -344,9 +344,9 @@ which can be called interactively, are: When hi-lock is started and if the mode is not excluded or patterns rejected, the beginning of the buffer is searched for lines of the form: - Hi-lock: FOO + Hi-lock: (FOO ...) -where FOO is a list of patterns. The patterns must start before +where (FOO ...) is a list of patterns. The patterns must start before position \(number of characters into buffer) `hi-lock-file-patterns-range'. Patterns will be read until Hi-lock: end is found. A mode is excluded if it's in the list @@ -818,7 +818,7 @@ SPACES-REGEXP is a regexp to substitute spaces in font-lock search." (not (looking-at "\\s-*end"))) (condition-case nil (setq all-patterns (append (read (current-buffer)) all-patterns)) - (error (message "Invalid pattern list expression at %d" + (error (message "Invalid pattern list expression at line %d" (line-number-at-pos))))))) (when (and all-patterns hi-lock-mode -- 2.39.2