Unverified Commit e4963748 authored by Philip Kaludercic's avatar Philip Kaludercic 🌝
Browse files

haunt.scm, local/theme.scm: fixed some local links

parent 944a166d
......@@ -22,7 +22,7 @@
sxml->html))))
(define (local-post-slug post)
(string-append (date->string (post-date post) "~Y/~m/")
(string-append (date->string (post-date post) "/~Y/~m/")
(basename (post-file-name post) ".md")))
(site #:title "#faui2k17"
......
......@@ -36,7 +36,7 @@
(span ,@(if (and site prefix)
`(" "
,(link "Permalink"
(format #f "/~a/~a.html"
(format #f "~a/~a.html"
prefix (site-post-slug site post)))
" | ")
'(""))
......
Supports Markdown
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