branch: externals/transient
commit be09fcb5f1dffb8a519a92ea0e9a36e0b0a10be0
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    transient--make-predicate-map: Clarify a pcase case
    
    The first two elements are fixed and the only other valid value for the
    third element was covered by the previous case.  Explicitly mention the
    only remaining value for the third element, instead of matching any one
    of the exactly one possible values.
---
 lisp/transient.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index f1458cb6d1..6f1d5f3331 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2136,7 +2136,7 @@ of the corresponding object."
                       (`(infix   ,_  ,_) #'transient--do-stay)
                       (`(suffix   t  ,_) #'transient--do-call)
                       ('(suffix nil   t) #'transient--do-return)
-                      (`(suffix nil  ,_) #'transient--do-exit)
+                      (`(suffix nil nil) #'transient--do-exit)
                       (`(suffix ,do  ,_) do))))))
         (when pre
           (if-let ((alt (lookup-key map id)))

Reply via email to