summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2020-10-09 08:52:14 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2020-10-09 08:52:14 -0400
commitfc7097f7368b384f6dc52d32da763af90bd3564a (patch)
treedf5ae7ed339469cdaa25878beddc02a0f26a03f1
parent5597c12f2bc7964a57ad11fba8130cc72203a2c2 (diff)
Add atom feed link.
-rw-r--r--haunt.scm4
-rw-r--r--images/feed.pngbin0 -> 689 bytes
2 files changed, 3 insertions, 1 deletions
diff --git a/haunt.scm b/haunt.scm
index b8a4a39..f27b2c1 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -137,7 +137,9 @@ free culture works available under the " ,%cc-by-sa-link " license.")
(string-append "/" (or prefix "")
(site-post-slug site post) ".html"))
- `((h1 ,title)
+ `((h1 ,title
+ (a (@ (href "/feed.xml"))
+ (img (@ (src "images/feed.png")))))
,(map (lambda (post)
(let ((uri (string-append "/"
(site-post-slug site post)
diff --git a/images/feed.png b/images/feed.png
new file mode 100644
index 0000000..b3c949d
--- /dev/null
+++ b/images/feed.png
Binary files differ