emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/embark 22fbe6de34 1/2: Fix custom type specifications


From: ELPA Syncer
Subject: [elpa] externals/embark 22fbe6de34 1/2: Fix custom type specifications
Date: Wed, 20 Sep 2023 12:58:20 -0400 (EDT)

branch: externals/embark
commit 22fbe6de34c076ec81a112bae083a7ad73cf601d
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix custom type specifications
---
 embark.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/embark.el b/embark.el
index 0969d34e84..5770c12268 100644
--- a/embark.el
+++ b/embark.el
@@ -301,8 +301,8 @@ prescribe a default for commands not used as alist keys."
                  (alist :tag "Configure per action"
                         :key-type (choice (function :tag "Action")
                                           (const :tag "All other actions" t))
-                        :value-type (choice (const :tag "Quit")
-                                            (const :tag "Do not quit")))))
+                        :value-type (choice (const :tag "Quit" t)
+                                            (const :tag "Do not quit" nil)))))
 
 (defcustom embark-confirm-act-all t
   "Should `embark-act-all' prompt the user for confirmation?
@@ -3351,7 +3351,7 @@ PRED is a predicate function used to filter the items."
 (defcustom embark-selection-indicator
   #("  Embark:%s " 1 12 (face (embark-selected bold)))
   "Mode line indicator used for selected candidates."
-  :type '(choice string nil))
+  :type '(choice string (const nil)))
 
 (defvar-local embark--selection nil
   "Buffer local list of selected targets.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]