From 5174aca4e8fe956abae7161d15058702bc8874c1 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Mon, 12 Aug 2019 20:46:35 -0500 Subject: [PATCH] Tidy: (org-ql-agenda--format-element) --- org-ql-agenda.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/org-ql-agenda.el b/org-ql-agenda.el index 93f67f4..8b71892 100644 --- a/org-ql-agenda.el +++ b/org-ql-agenda.el @@ -377,10 +377,11 @@ return an empty string." (warn "No marker found for item: %s" title) (org-element-property :tags element)) (org-element-property :tags element))) - (tag-string (-some--> tag-list - (s-join ":" it) - (s-wrap it ":") - (org-add-props it nil 'face 'org-tag))) + (tag-string (when tag-list + (--> tag-list + (s-join ":" it) + (s-wrap it ":") + (org-add-props it nil 'face 'org-tag)))) ;; (category (org-element-property :category element)) (priority-string (-some->> (org-element-property :priority element) (char-to-string)