From be4c80642ef8da8bd377ced3d1f6ef9c8e0dd720 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 28 Dec 2023 07:31:09 +0200 Subject: Add gnosis-get-note-tags --- gnosis.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/gnosis.el b/gnosis.el index cb5efa4..3c0956f 100644 --- a/gnosis.el +++ b/gnosis.el @@ -87,6 +87,10 @@ Example: "Get VALUE from TABLE, optionally with where RESTRICTIONS." (caar (gnosis--select value table restrictions))) +(defun gnosis-get-note-tags (id) + "Return tags for note ID." + (gnosis-get 'tags 'notes `(= id ,id))) + (defun gnosis--delete (table value) "From TABLE use where to delete VALUE." (emacsql gnosis-db `[:delete :from ,table :where ,value])) -- cgit v1.2.3