summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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))))