summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdam Porter <adam@alphapapa.net>2024-01-23 17:29:15 -0600
committerAdam Porter <adam@alphapapa.net>2024-01-23 17:29:15 -0600
commit13a51e332cfc608e8507418c621952aca0a607fb (patch)
treef2b05d02737651db3592708d5f60983516c1ee28
parentf43bbf602ee4cc47c3a6596b5e1e69acb021b226 (diff)
Fix: (magit-section-ident-value) Call next method for other values
Not sure how the previous change suddenly caused this to happen in my deffy-buffer command, but this seems to fix it, and seems correct.
-rw-r--r--taxy-magit-section.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/taxy-magit-section.el b/taxy-magit-section.el
index c02a7c3..c4e68b1 100644
--- a/taxy-magit-section.el
+++ b/taxy-magit-section.el
@@ -96,8 +96,10 @@ this does not disable indentation of section headings.")
;; hierarchical path, but since the taxys aren't doubly linked, that isn't easily done.
;; Could probably be worked around by binding a special variable around the creation of
;; the taxy hierarchy that would allow the path to be saved into each taxy.
- (when-let ((taxy (oref section value)))
- (taxy-name taxy)))
+ (let ((value (oref section value)))
+ (cl-typecase value
+ (taxy (taxy-name value))
+ (otherwise (cl-call-next-method)))))
;;;; Commands