[elpa] externals/transient fa3b7574bb 087/366: transient--layout-member: Use appropriate argument order

[Jonas Bernoulli]

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

    transient--layout-member: Use appropriate argument order
    
    Like for `member' the "element" should come before the "list".
---
 lisp/transient.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index fe013f8ca6..9261ad6e20 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -869,7 +869,7 @@ example, sets a variable use `define-infix-command' instead.
 
 (defun transient--insert-suffix (prefix loc suffix action)
   (let* ((suf (transient--parse-suffix prefix suffix))
-         (mem (transient--layout-member prefix loc)))
+         (mem (transient--layout-member loc prefix)))
     (if mem
         (progn
           (transient-remove-suffix prefix (plist-get (nth 2 suf) :command))
@@ -916,14 +916,14 @@ PREFIX is a prefix command, a symbol.
 LOC is a command, a key vector or a key description
   (a string as returned by `key-description')."
   (declare (indent defun))
-  (transient--layout-member prefix loc 'remove))
+  (transient--layout-member loc prefix 'remove))
 
 (defun transient-get-suffix (prefix loc)
   "Return the suffix at LOC from PREFIX.
 PREFIX is a prefix command, a symbol.
 LOC is a command, a key vector or a key description
   (a string as returned by `key-description')."
-  (if-let ((mem (transient--layout-member prefix loc)))
+  (if-let ((mem (transient--layout-member loc prefix)))
       (car mem)
     (error "%s not found in %s" loc prefix)))
 
@@ -938,7 +938,7 @@ PROP has to be a keyword.  What keywords and values
     (setf (nth 2 elt)
           (plist-put (nth 2 elt) prop value))))
 
-(defun transient--layout-member (prefix loc &optional remove)
+(defun transient--layout-member (loc prefix &optional remove)
   (if-let ((layout (get prefix 'transient--layout)))
       (cl-labels
           ((mem (layout loc)