[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient cc887ebe3f 2/4: transient--delay-post-command
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient cc887ebe3f 2/4: transient--delay-post-command: Fix execute-extended-command handling |
Date: |
Wed, 3 Aug 2022 06:04:04 -0400 (EDT) |
branch: externals/transient
commit cc887ebe3fa85a3642d937efe2ff882b356da9c0
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
transient--delay-post-command: Fix execute-extended-command handling
This completes [1: d9b3a54].
We have to make sure that both strings are multi-byte,
else they might be just "equal"; not `equal'.
1: 2022-05-08 d9b3a54128065222d35ce4ba49cdb39e23a06d2f
transient--delay-post-command: Handle execute-extended-command
---
lisp/transient.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 6d67e21d0d..b7057e7531 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2175,8 +2175,9 @@ value. Otherwise return CHILDREN as is."
;; `execute-extended-command' was
;; used to call another command
;; that also uses the minibuffer.
- (equal (this-command-keys)
- (format "\M-x%s\r" this-command))))))
+ (equal
+ (string-to-multibyte (this-command-keys))
+ (format "\M-x%s\r" this-command))))))
(transient--debug 'post-command-hook "act: %s" act)
(when act
(remove-hook 'transient--post-command-hook post-command)