summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Widen <andreas@harmonicflow.org>2023-11-26 16:40:12 +0100
committerAndreas Widen <andreas@harmonicflow.org>2023-11-26 16:40:12 +0100
commit0df690cb4b5d7b8040be6a87d832e652d79b68a8 (patch)
tree6124b238ea8493cb33915ddc3996d52cbb2b8a6c
parent1b2b7c3eb939724696894f31ff27db97b0cac84c (diff)
downloadhf-web-0df690cb4b5d7b8040be6a87d832e652d79b68a8.tar.xz
hf-web-0df690cb4b5d7b8040be6a87d832e652d79b68a8.zip
blog: Fix link in sidebar tag and atom feed.
Signed-off-by: Andreas Widen <andreas@harmonicflow.org>
-rw-r--r--apps/blog/templates/components.scm2
-rw-r--r--apps/blog/templates/feed.scm5
2 files changed, 3 insertions, 4 deletions
diff --git a/apps/blog/templates/components.scm b/apps/blog/templates/components.scm
index 6c49f94..79bd5bd 100644
--- a/apps/blog/templates/components.scm
+++ b/apps/blog/templates/components.scm
@@ -73,6 +73,6 @@
(lambda (tag)
`(li (@ (class "bar-item"))
(a (@ (class "bar-link")
- (href ,(hfweb-url (url-path-join (tag-url-path tag) ""))))
+ (href ,(hfweb-url (url-path-join (tag-url-path tag)))))
,tag)))
(sort tags tag-first?)))))
diff --git a/apps/blog/templates/feed.scm b/apps/blog/templates/feed.scm
index bfa1cc4..b11f026 100644
--- a/apps/blog/templates/feed.scm
+++ b/apps/blog/templates/feed.scm
@@ -36,7 +36,7 @@
,@(map
(lambda (post)
`(entry
- (id ,(url-path-join domain (post-url-path post) ""))
+ (id ,(url-path-join domain (post-url-path post)))
(title ,(post-ref post 'title))
(author (name ,(post-ref post 'author)))
(published ,(date->string (post-date post) "~4"))
@@ -44,8 +44,7 @@
;(rights (@ (type "text")) ,(post-copyright post))
(link (@ (rel "alternate")
(href ,(url-path-join domain
- (post-url-path post)
- ""))))
+ (post-url-path post)))))
,@(map
(lambda (tag)
`(category (@ (term ,tag))))