RSSフィードへのリンクを目立たなくする

邪魔だったため。
記事を読んだ人がRSS購読してやってもいいかなってなったときにのみ購読で
きれば良い気がするので記事のページからのみアクセスできるようにした。

haunt.scm

@@ -101,7 +101,6 @@
         (type . "website")
         (url . "/"))
       `((h1 "最近の投稿")
-        (p (a (@ (href "feed.xml")) "RSSフィードを購読する"))
         (ul (@ (class "post-list"))
             ,@(map (lambda (post)
                      (let ((url (post-url post)))
@@ -129,9 +128,9 @@
         (div ,(post-sxml post))
         (ul (@ (class "post-end"))
             (li (a (@ (href "/")) "投稿の一覧"))
-            (li (a (@ (href "feed.xml")) "RSSフィードを購読する"))
             (li (a (@ (href ,(string-append "https://gitlab.com/tojoqk/www-tojo-tokyo/-/tree/master/" (post-file-name post))))
-                   "このページのソースコード"))))))))
+                   "このページのソースコード"))
+            (li (a (@ (href "feed.xml")) "RSSフィードを購読する"))))))))
 
 (define (blog/tojoqk)
   (blog #:theme (theme/tojoqk)