[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient e904810 3/5: Explicitly call transient--pre-c
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient e904810 3/5: Explicitly call transient--pre-command in button action |
Date: |
Mon, 26 Jul 2021 16:11:44 -0400 (EDT) |
branch: externals/transient
commit e90481000f071e9a26a1cc0f40d347f7d3e2201e
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
Explicitly call transient--pre-command in button action
`call-interactively' does not appear to call `pre-command-hook',
which is how `transient--pre-command' is normally run.
---
lisp/transient.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/transient.el b/lisp/transient.el
index 954a1b5..cca092f 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -3406,6 +3406,7 @@ resumes the suspended transient.")
;; Yes, I know that this is wrong(tm).
;; Unfortunately it is also necessary.
(setq this-original-command command)
+ (transient--pre-command)
(call-interactively command))))
(defvar transient-popup-navigation-map