branch: elpa/git-commit
commit e281dac92ec47661b12b212c4f91c3abe898f994
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    magit-insert-section--finish: Cosmetics
---
 lisp/magit-section.el | 31 +++++++++++++++----------------
 1 file changed, 15 insertions(+), 16 deletions(-)

diff --git a/lisp/magit-section.el b/lisp/magit-section.el
index b70d38908a..564940e8f3 100644
--- a/lisp/magit-section.el
+++ b/lisp/magit-section.el
@@ -1459,22 +1459,21 @@ anything this time around.
               (put-text-property (point) next 'keymap map)))
           (magit-section-maybe-add-heading-map obj)
           (goto-char next)))))
-  (cond
-   ((eq obj magit-root-section)
-    (when (eq magit-section-inhibit-markers 'delay)
-      (setq magit-section-inhibit-markers nil)
-      (magit-map-sections
-       (lambda (section)
-         (oset section start (copy-marker (oref section start) t))
-         (oset section end   (copy-marker (oref section end) t)))))
-    (let ((magit-section-cache-visibility nil))
-      (magit-section-show obj)))
-   (magit-section-insert-in-reverse
-    (push obj (oref (oref obj parent) children)))
-   ((let ((parent (oref obj parent)))
-      (oset parent children
-            (nconc (oref parent children)
-                   (list obj))))))
+  (cond ((eq obj magit-root-section)
+         (when (eq magit-section-inhibit-markers 'delay)
+           (setq magit-section-inhibit-markers nil)
+           (magit-map-sections
+            (lambda (section)
+              (oset section start (copy-marker (oref section start) t))
+              (oset section end   (copy-marker (oref section end) t)))))
+         (let ((magit-section-cache-visibility nil))
+           (magit-section-show obj)))
+        (magit-section-insert-in-reverse
+         (push obj (oref (oref obj parent) children)))
+        ((let ((parent (oref obj parent)))
+           (oset parent children
+                 (nconc (oref parent children)
+                        (list obj))))))
   (when magit-section-insert-in-reverse
     (setq magit-section-insert-in-reverse nil)
     (oset obj children (nreverse (oref obj children)))))

Reply via email to