Commit 28f10eb9 authored by Masaya Tojo's avatar Masaya Tojo
Browse files

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

邪魔だったため。
記事を読んだ人がRSS購読してやってもいいかなってなったときにのみ購読で
きれば良い気がするので記事のページからのみアクセスできるようにした。
parent aaf6f488
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment