summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--haunt/builder/atom.scm2
-rw-r--r--haunt/builder/blog.scm2
2 files changed, 2 insertions, 2 deletions
diff --git a/haunt/builder/atom.scm b/haunt/builder/atom.scm
index 84f112c..9abe33d 100644
--- a/haunt/builder/atom.scm
+++ b/haunt/builder/atom.scm
@@ -54,7 +54,7 @@
,(let ((email (post-ref post 'email)))
(if email `(email ,email) '())))
(updated ,(date->string* (post-date post)))
- (link (@ (href ,(string-append "/" blog-prefix
+ (link (@ (href ,(string-append blog-prefix "/"
(site-post-slug site post) ".html"))
(rel "alternate")))
(summary (@ (type "html"))
diff --git a/haunt/builder/blog.scm b/haunt/builder/blog.scm
index 7a9d661..2830881 100644
--- a/haunt/builder/blog.scm
+++ b/haunt/builder/blog.scm
@@ -71,7 +71,7 @@
(define (ugly-default-collection-template site title posts prefix)
(define (post-uri post)
- (string-append "/" (or prefix "")
+ (string-append (or prefix "") "/"
(site-post-slug site post) ".html"))
`((h3 ,title)