(core): add org-roam-node-category (#2300)

3 years ago · 938c602faa
parent 45a6863e07
commit 938c602faa
1 changed files with 4 additions and 0 deletions
--- a/org-roam-node.el
+++ b/org-roam-node.el
@ -210,6 +210,10 @@ This path is relative to `org-roam-directory'."
    (_
     (org-roam-node-title node))))

+(cl-defmethod org-roam-node-category ((node org-roam-node))
+  "Return the category for NODE."
+  (cdr (assoc-string "CATEGORY" (org-roam-node-properties node))))
+
 ;;; Nodes
 ;;;; Getters
 (defun org-roam-node-at-point (&optional assert)