about summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2020-03-13 23:52:34 +0530
committerArun Isaac2020-03-13 23:52:34 +0530
commit28b1aa71052c0288381a66c845d90e6416bb2f9a (patch)
tree790c2b0b1eb7f0cb319ffa2197d6909a4710b3d1
parent754e1d61e476145e69b32b3879daf78c2b83d554 (diff)
downloadennum-28b1aa71052c0288381a66c845d90e6416bb2f9a.tar.gz
ennum-28b1aa71052c0288381a66c845d90e6416bb2f9a.tar.lz
ennum-28b1aa71052c0288381a66c845d90e6416bb2f9a.zip
List tags only if present.
* ennu-html.el (ennu-html-inner-template): List tags only if present.
-rw-r--r--ennu-html.el18
1 files changed, 10 insertions, 8 deletions
diff --git a/ennu-html.el b/ennu-html.el
index 28a4a6b..bf7cb0f 100644
--- a/ennu-html.el
+++ b/ennu-html.el
@@ -246,14 +246,16 @@
               translations
               ", ")))
    ;; Tags
-   (format "<p>Tags: %s</p>"
-           (mapconcat
-            (lambda (tag)
-              (replace-regexp-in-string
-               "<a " "<a class=\"p-category\" "
-               (ennu-export-tag (ennu-add-tongue-suffix tag (plist-get info :language))
-                                tag (org-export-backend-name (plist-get info :back-end)))))
-            tags ", "))
+   (when-let (tags (plist-get info :filetags))
+     (format "<p>Tags: %s</p>"
+             (mapconcat
+              (lambda (tag)
+                (replace-regexp-in-string
+                 "<a " "<a class=\"p-category\" "
+                 (ennu-export-tag (ennu-add-tongue-suffix tag (plist-get info :language))
+                                  tag (org-export-backend-name (plist-get info :back-end)))))
+              tags
+              ", ")))
    ;; Summary
    (format "<div class=\"p-summary\">%s</div>"
            (org-export-data (plist-get info :summary) info))