rss support added

haunt.scm

@@ -5,6 +5,7 @@
 			 (haunt html)
 			 (haunt builder blog)
 			 (haunt builder atom)
+			 (haunt builder rss)
 			 (haunt builder assets)
 			 (haunt reader commonmark)
 			 (local micronews paged-blog)
@@ -27,8 +28,10 @@
       #:readers (list commonmark-reader)
       #:builders (list (paged-blog #:theme local-site-theme
 								   #:prefix "post")
-					   (atom-feed)
-					   (atom-feeds-by-tag)
+					   (atom-feed #:blog-prefix "post")
+					   (atom-feeds-by-tag #:prefix "tags"
+										  #:blog-prefix "post")
+					   (rss-feed #:blog-prefix "post")
 					   (static-page "meta" "Meta"
 									%meta-page)
 					   (static-page "irc" "IRC"

local/theme.scm

@@ -25,7 +25,7 @@
 		   (span "Tags: "
 				 ,(intersperse
 				   (map (lambda (tag)
-						  (link tag (format #f "/feeds/tags/~a.xml" tag)))
+						  (link tag (format #f "/tags/~a.xml" tag)))
 						(or (post-ref post 'tags) '()))
 				   ", "))
 		   ,@(if (and site prefix)
@@ -53,7 +53,8 @@
 					  (link "IRC" "/irc.html")
 					  (link "WhatsApp" "/whatsapp.html")
 					  (link "Beitragen" "/meta.html")
-					  (link "Atom Feed" "/feed.xml"))))
+					  (link "Atom" "/feed.xml")
+					  (link "RSS" "/rss-feed.xml"))))
         ,body)))
    #:post-template (make-post-generator)
    #:collection-template