branch: externals/transient
commit f23f51e24ea0fe4117baf8fc9bb1b76b68bcad77
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
Rename transient--{do => call}-pre-command
---
lisp/transient.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index f818342e5e..cdec9ca86f 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2171,7 +2171,7 @@ value. Otherwise return CHILDREN as is."
(transient--wrap-command))
(t
(setq transient--exitp nil)
- (let ((exitp (eq (transient--do-pre-command) transient--exit)))
+ (let ((exitp (eq (transient--call-pre-command) transient--exit)))
(transient--wrap-command)
(when exitp
(transient--pre-exit)))))))
@@ -2504,7 +2504,7 @@ nil) then do nothing."
;;; Pre-Commands
-(defun transient--do-pre-command ()
+(defun transient--call-pre-command ()
(if-let ((fn (transient--get-predicate-for this-command)))
(let ((action (funcall fn)))
(when (eq action transient--exit)
@@ -2590,7 +2590,7 @@ Use that command's pre-command to determine transient
behavior."
(posn-point (event-start
last-command-event))
(point))
'command)))
- (transient--do-pre-command)))
+ (transient--call-pre-command)))
(defun transient--do-recurse ()
"Call the transient prefix command, preparing for return to active transient.
