[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/git-commit e281dac92e 01/10: magit-insert-section--finish:
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/git-commit e281dac92e 01/10: magit-insert-section--finish: Cosmetics |
Date: |
Fri, 3 May 2024 21:59:59 -0400 (EDT) |
branch: elpa/git-commit
commit e281dac92ec47661b12b212c4f91c3abe898f994
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@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)))))
- [nongnu] elpa/git-commit updated (56a27154cd -> e2ca80a26e), ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 5589aede70 03/10: magit-insert-section--finish: Add all properties in one go, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 5544bac955 06/10: magit-insert-section--finish: Avoid unnecessary work for root section, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit e2ca80a26e 10/10: magit-insert-section--create: Only set hidden slot if unbound, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit e281dac92e 01/10: magit-insert-section--finish: Cosmetics,
ELPA Syncer <=
- [nongnu] elpa/git-commit 5d3f2210f2 08/10: magit-section-insert--finish: Restore reverse child collection, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit d22fb56615 07/10: magit-insert-section--finish: Add heading keymap just once, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 153cba365f 02/10: magit-insert-section--finish: Avoid some oref calls, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 4ec4d0272e 04/10: magit-insert-section--finish: Optimize propertizing leaf sections, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 536ac9ff0d 09/10: magit-insert-section--create: Cosmetics, ELPA Syncer, 2024/05/03
- [nongnu] elpa/git-commit 54d969b62f 05/10: magit-insert-section--finish: Optimize for leaf sections, ELPA Syncer, 2024/05/03