aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
authorMauro Aranda2023-09-13 12:49:40 -0300
committerStefan Kangas2023-09-13 18:01:41 +0200
commit012f9c28053d06b6d527d77530605aedbd55d5b4 (patch)
treed02b98a0099182ae9d70ff8eadd21dfc932fcd75 /lisp/replace.el
parent1f7113e68988fa0bcbdeca5ae364cba8d6db3637 (diff)
downloademacs-012f9c28053d06b6d527d77530605aedbd55d5b4.tar.gz
emacs-012f9c28053d06b6d527d77530605aedbd55d5b4.zip
Fix defcustom :type in replace.el (Bug#65920)
* lisp/replace.el (list-matching-lines-face) (list-matching-lines-buffer-name-face): Allow a nil value.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index eeac734f3bd..6b06e48c384 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1667,13 +1667,15 @@ A positive number means to include that many lines both before and after."
1667(defcustom list-matching-lines-face 'match 1667(defcustom list-matching-lines-face 'match
1668 "Face used by \\[list-matching-lines] to show the text that matches. 1668 "Face used by \\[list-matching-lines] to show the text that matches.
1669If the value is nil, don't highlight the matching portions specially." 1669If the value is nil, don't highlight the matching portions specially."
1670 :type 'face 1670 :type '(choice (const :tag "Don't highlight matching portions" nil)
1671 face)
1671 :group 'matching) 1672 :group 'matching)
1672 1673
1673(defcustom list-matching-lines-buffer-name-face 'underline 1674(defcustom list-matching-lines-buffer-name-face 'underline
1674 "Face used by \\[list-matching-lines] to show the names of buffers. 1675 "Face used by \\[list-matching-lines] to show the names of buffers.
1675If the value is nil, don't highlight the buffer names specially." 1676If the value is nil, don't highlight the buffer names specially."
1676 :type 'face 1677 :type '(choice (const :tag "Don't highlight buffer names" nil)
1678 face)
1677 :group 'matching) 1679 :group 'matching)
1678 1680
1679(defcustom list-matching-lines-current-line-face 'lazy-highlight 1681(defcustom list-matching-lines-current-line-face 'lazy-highlight