branch: externals/transient
commit 85d3148137597242b64a6766c20931d3a6b7b92c
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
transient--suffix-key: Renamed function
Include "suffix" in the name, same as in `transient--suffix-props'.
The name of the argument ("spec") should be enough to make it clear
what the expected form of the "suffix" is.
---
lisp/transient.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 1f0ec6fea5..a5bd300856 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1549,7 +1549,7 @@ Intended for use in a group's `:setup-children' function."
(t
(when-let* (((not (eq keep-other 'always)))
(bindingp (listp suf))
- (key (transient--spec-key suf))
+ (key (transient--suffix-key suf))
(conflict (car (transient--locate-child prefix key)))
(conflictp
(and (not (and (eq action 'replace)
@@ -1714,7 +1714,7 @@ See info node `(transient)Modifying Existing Transients'."
(defun transient--nth (n list)
(nth (if (< n 0) (- (length list) (abs n)) n) list))
-(defun transient--spec-key (spec)
+(defun transient--suffix-key (spec)
(let ((props (transient--suffix-props spec)))
(or (plist-get props :key)
(transient--command-key
