branch: elpa/git-commit
commit c48934b20a2b0628fa51204611decb97dc09252f
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
magit-log-wash-rev: Set correct commit section type upfront
---
lisp/magit-log.el | 16 ++++++++++------
1 file changed, 10 insertions(+), 6 deletions(-)
diff --git a/lisp/magit-log.el b/lisp/magit-log.el
index 6d8d5ed109..a9434bb63b 100644
--- a/lisp/magit-log.el
+++ b/lisp/magit-log.el
@@ -1361,12 +1361,16 @@ Do not add this to a hook variable."
;; of the youngest expired reflog entry.
(when (and (eq style 'reflog) (not date))
(cl-return-from magit-log-wash-rev t))
- (magit-insert-section section (commit hash)
- (pcase style
- ('stash (oset section type 'stash))
- ('module (oset section type 'module-commit))
- ('bisect-log (setq hash (magit-rev-parse "--short" hash))))
- (setq hash (propertize hash 'font-lock-face
+ (magit-insert-section
+ ((eval (pcase style
+ ('stash 'stash)
+ ('module 'module-commit)
+ (_ 'commit)))
+ hash)
+ (setq hash (propertize (if (eq style 'bisect-log)
+ (magit-rev-parse "--short" hash)
+ hash)
+ 'font-lock-face
(pcase (and gpg (aref gpg 0))
(?G 'magit-signature-good)
(?B 'magit-signature-bad)
