tweak wording on index, add rss, adjust feed file-names

diff --git a/haunt.scm b/haunt.scm
index 6a6f113..49db025 100644 (file)
--- a/haunt.scm
+++ b/haunt.scm
@@ -2,6 +2,7 @@
              (haunt builder blog)
              (haunt builder atom)
              (haunt builder assets)
              (haunt builder blog)
              (haunt builder atom)
              (haunt builder assets)

+             (haunt builder rss)

              (haunt html)
              (haunt page)
              (haunt post)
              (haunt html)
              (haunt page)
              (haunt post)


@@ -106,19 +107,22 @@
        ".  I’m a "
        (a (@ (href "https://www.gnu.org/philosophy/free-sw.html"))
           "Free Software")
        ".  I’m a "
        (a (@ (href "https://www.gnu.org/philosophy/free-sw.html"))
           "Free Software")

-       " activist and FSF "
-       (a (@ (href "https://www.fsf.org/associate/")) "supporter")
-       ", and a GNU "
+       " activist, a GNU "

        (a (@ (href "https://www.gnu.org/people/#bandali"))
           "maintainer")
        " and "
        (a (@ (href "https://www.gnu.org/people/webmeisters.html#bandali"))
           "webmaster")
        (a (@ (href "https://www.gnu.org/people/#bandali"))
           "maintainer")
        " and "
        (a (@ (href "https://www.gnu.org/people/webmeisters.html#bandali"))
           "webmaster")

+       ", and an "
+       (a (@ (href "https://www.fsf.org/associate/"))
+          "associate member")
+       " of the " (a (@ (href "https:///www.fsf.org")
+                        (title "Free Software Foundation")) "FSF")

        ".  I co-host the "
        (a (@ (href "https://emacsel.com")) "Emacs.el")
        " podcast with "
        ".  I co-host the "
        (a (@ (href "https://emacsel.com")) "Emacs.el")
        " podcast with "

-       (a (@ (href "https://www.pygopar.com"))
-          "Daniel Gopar") ", and organize "
+       (a (@ (href "https://www.pygopar.com")) "Daniel Gopar")
+       ", and organize "

        (a (@ (href "https://emacsconf.org")) "EmacsConf") " with help"
        " from many wonderful people.  I am also a member of the"
        " Systems Committee for the "
        (a (@ (href "https://emacsconf.org")) "EmacsConf") " with help"
        " from many wonderful people.  I am also a member of the"
        " Systems Committee for the "


@@ -232,6 +236,10 @@
                              `(("Notes" "notes.html"
                                 ,posts/reverse-chronological)))
                        index-page
                              `(("Notes" "notes.html"
                                 ,posts/reverse-chronological)))
                        index-page

-                       (atom-feed)
-                       (atom-feeds-by-tag)
+                       (atom-feed
+                        #:file-name "feed.atom")
+                       (atom-feeds-by-tag
+                        #:prefix "tags")
+                       (rss-feed
+                        #:file-name "feed.rss")

                        (static-directory "static" "")))
                        (static-directory "static" "")))