summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFlorian Pelz <pelzflorian@pelzflorian.de>2017-05-24 12:42:08 +0200
committerFlorian Pelz <pelzflorian@pelzflorian.de>2017-05-24 12:42:08 +0200
commit446f6dd78dbd1952258b4303ba2436b69fdf01a5 (patch)
tree032f983e611b9e14c758d891c38670a8f4b48082
parent5a25b958c6720e1d74f6b62c3547f382c9b79d2f (diff)
Fix indentation.
-rw-r--r--haunt.scm14
1 files changed, 7 insertions, 7 deletions
diff --git a/haunt.scm b/haunt.scm
index 34fe749..3c055fa 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -144,7 +144,7 @@
`(li
(a (@ (href ,url)
(class "full-width-link"))
- ,link-content)))
+ ,link-content)))
(define (a-href-multi-list-element pairs link-content)
"A list element linking to multiple formats. Pairs should be a list of pairs each consisting of a file extension and a url."
@@ -165,7 +165,7 @@
(let ((current-lingua lingua))
`(a (@ (href ,(string-append "/index" "-" lingua ".html"))
(class "full-width-link"))
- ,(_ "← Back to home page"))))
+ ,(_ "← Back to home page"))))
(define (recent-post-link-for-lingua lingua)
(let ((current-lingua lingua))
@@ -321,11 +321,11 @@
(post-slug post)
".html"))))
(class "full-width-link"))
- ,(string-append
- (post-ref post 'title)
- " ("
- (date->string-for-lingua (post-date post) current-lingua)
- ")"))))
+ ,(string-append
+ (post-ref post 'title)
+ " ("
+ (date->string-for-lingua (post-date post) current-lingua)
+ ")"))))
(posts/reverse-chronological posts)))
,(back-button-for-lingua current-lingua)))))