Merge 32cf9d9986 into 4f62ba3bd6

2023-11-11 02:09:26 -07:00 · 2023-11-11 02:09:26 -07:00 · 70fa807c70
commit 70fa807c70
parent 4f62ba3bd6 32cf9d9986
1 changed files with 10 additions and 5 deletions
--- a/org-ql-view.el
+++ b/org-ql-view.el
@ -884,7 +884,12 @@ return an empty string."
                           (display-warning 'org-ql (format "No marker found for item: %s" title))
                           (org-element-property :tags element))
                       (org-element-property :tags element)))
-           (tag-string (when tag-list
+           (tag-string (when-let
+			   ((tag-list (if (not org-agenda-hide-tags-regexp)
+					  tag-list
+					(cl-remove-if
+					 (lambda (tag) (string-match-p org-agenda-hide-tags-regexp tag))
+					 tag-list))))
 			 (--> tag-list
 			      (s-join ":" it)
 			      (s-wrap it ":")