summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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