[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 422b0f2a50: Make hi-lock-face-defaults into a defcustom
From: |
Lars Ingebrigtsen |
Subject: |
master 422b0f2a50: Make hi-lock-face-defaults into a defcustom |
Date: |
Mon, 24 Jan 2022 14:18:34 -0500 (EST) |
branch: master
commit 422b0f2a505e6e0af9500e4014f3b12c337888a5
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Make hi-lock-face-defaults into a defcustom
* lisp/hi-lock.el (hi-lock-face-defaults): Make into defcustom.
---
lisp/hi-lock.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index 0f5409ef43..0934eef8ed 100644
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -235,10 +235,12 @@ by cycling through the faces in `hi-lock-face-defaults'."
"Human-readable lighters for `hi-lock-interactive-patterns'.")
(put 'hi-lock-interactive-lighters 'permanent-local t)
-(defvar hi-lock-face-defaults
+(defcustom hi-lock-face-defaults
'("hi-yellow" "hi-pink" "hi-green" "hi-blue" "hi-salmon" "hi-aquamarine"
"hi-black-b" "hi-blue-b" "hi-red-b" "hi-green-b" "hi-black-hb")
- "Default faces for hi-lock interactive functions.")
+ "Default face names for hi-lock interactive functions."
+ :type '(repeat string)
+ :version "29.1")
(defvar hi-lock-file-patterns-prefix "Hi-lock"
"String used to identify hi-lock patterns at the start of files.")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 422b0f2a50: Make hi-lock-face-defaults into a defcustom,
Lars Ingebrigtsen <=