[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 63391fb2d7: Use hashed symbols
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 63391fb2d7: Use hashed symbols |
Date: |
Sat, 2 Dec 2023 06:57:40 -0500 (EST) |
branch: externals/consult
commit 63391fb2d7fbad61ba7a44acbae4da6669c89f31
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Use hashed symbols
---
consult.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/consult.el b/consult.el
index 0f4a0b3264..f8d3adf745 100644
--- a/consult.el
+++ b/consult.el
@@ -89,8 +89,8 @@ The function takes one boolean argument MAY-PROMPT. If
MAY-PROMPT is non-nil, the function may ask the prompt the user
for a project directory. The root directory is used by
`consult-buffer' and `consult-grep'."
- :type '(choice
- (const :tag "Default project function"
consult--default-project-function)
+ :type `(choice
+ (const :tag "Default project function"
,#'consult--default-project-function)
(function :tag "Custom function")
(const :tag "No project integration" nil)))
@@ -132,10 +132,10 @@ This applies to asynchronous commands, e.g.,
`consult-grep'."
(const :tag "Perl" perl)))
(defcustom consult-async-split-styles-alist
- '((nil :function consult--split-nil)
- (comma :separator ?, :function consult--split-separator)
- (semicolon :separator ?\; :function consult--split-separator)
- (perl :initial "#" :function consult--split-perl))
+ `((nil :function ,#'consult--split-nil)
+ (comma :separator ?, :function ,#'consult--split-separator)
+ (semicolon :separator ?\; :function ,#'consult--split-separator)
+ (perl :initial "#" :function ,#'consult--split-perl))
"Async splitting styles."
:type '(alist :key-type symbol :value-type plist))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult 63391fb2d7: Use hashed symbols,
ELPA Syncer <=