branch: externals/org-gnosis
commit 4806f8899a1205b5c6c764df9cfbcb7ae9eda929
Author: Thanos Apollo <pub...@thanosapollo.org>
Commit: Thanos Apollo <pub...@thanosapollo.org>

    new func: org-gnosis--combine-tags.
    
    + Combine node tags.
---
 org-gnosis.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/org-gnosis.el b/org-gnosis.el
index 8448087894..c5c6886aea 100644
--- a/org-gnosis.el
+++ b/org-gnosis.el
@@ -104,6 +104,11 @@ TOPIC-ID is fallback."
                  for parent-id = (nth i id-stack)
                  when parent-id return parent-id)
         topic-id)))
+
+(defun org-gnosis--combine-tags (inherited-tags headline-tags)
+  "Combine INHERITED-TAGS and HEADLINE-TAGS, removing duplicates."
+  (delete-dups (append (or inherited-tags '()) (or headline-tags '()))))
+
 (defun org-gnosis-select (value table &optional restrictions flatten)
   "Select VALUE from TABLE, optionally with RESTRICTIONS.
 

Reply via email to