commit 8dfac0e4f978a681139d55ce212cf7c04919f66c
from: Omar Polo <op@omarpolo.com>
date: Thu Nov 05 14:56:53 2020 UTC

[html] export images with a figcaption

commit - afa13235cb883ed68a3134be8a370341798f2b2c
commit + 8dfac0e4f978a681139d55ce212cf7c04919f66c
blob - 683b87aed6b58b9981c6e69740517227f9b4a4b5
blob + 465fb98bc05d3f894a9e80d70f3a2f6782cc451a
--- src/blog/gemtext.clj
+++ src/blog/gemtext.clj
@@ -147,9 +147,11 @@
   [[_ href text]]
   (let [text (html-escape text)]
     (if (re-matches #".*\.(jpg|jpeg|png|gif)" href)
-      [:p [:a {:href href}
-           [:img {:src href
-                  :alt text}]]]
+      [:figure
+       [:a {:href href}
+        [:img {:src href
+               :alt text}]]
+       [:figcaption text]]
       [:p.link [:a {:href href}
                 text]])))