emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/transient d024581863 2/3: Use defun indentation for cl-


From: Jonas Bernoulli
Subject: [elpa] externals/transient d024581863 2/3: Use defun indentation for cl-labels binding
Date: Wed, 6 Apr 2022 17:14:40 -0400 (EDT)

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

    Use defun indentation for cl-labels binding
---
 lisp/transient.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 6006e1c03d..da925434f1 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1845,13 +1845,13 @@ value.  Otherwise return CHILDREN as is."
 
 (defun transient--flatten-suffixes (layout)
   (cl-labels ((s (def)
-                 (cond
-                  ((stringp def) nil)
-                  ((listp def) (cl-mapcan #'s def))
-                  ((transient-group--eieio-childp def)
-                   (cl-mapcan #'s (oref def suffixes)))
-                  ((transient-suffix--eieio-childp def)
-                   (list def)))))
+                (cond
+                 ((stringp def) nil)
+                 ((listp def) (cl-mapcan #'s def))
+                 ((transient-group--eieio-childp def)
+                  (cl-mapcan #'s (oref def suffixes)))
+                 ((transient-suffix--eieio-childp def)
+                  (list def)))))
     (cl-mapcan #'s layout)))
 
 (defun transient--init-child (levels spec)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]