summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJakob L. Kreuze <zerodaysfordays@sdf.lonestar.org>2020-01-05 18:48:45 -0500
committerJakob L. Kreuze <zerodaysfordays@sdf.lonestar.org>2020-01-05 18:48:53 -0500
commita70f225d6abda73d07e26d7f9b32a18be4edb1d4 (patch)
treecb5ce53f1428eef1223fee4509ed6d09091aa731
parentb6811d23266cf804ea58919ab85e6aec4be7b7e7 (diff)
Remove extraneous backticks from templates.
-rw-r--r--haunt/jakob/builder/blog.scm2
-rw-r--r--haunt/jakob/builder/blogroll.scm6
2 files changed, 4 insertions, 4 deletions
diff --git a/haunt/jakob/builder/blog.scm b/haunt/jakob/builder/blog.scm
index 5c83bd3..84a687e 100644
--- a/haunt/jakob/builder/blog.scm
+++ b/haunt/jakob/builder/blog.scm
@@ -48,7 +48,7 @@
(define (render-article post)
"Return the SHTML for POST's contents."
#<(main
- `(h1 ,(post-ref post 'title))
+ (h1 ,(post-ref post 'title))
(p ,(date->string (post-date post) "~B ~d, ~Y")
" ❖ "
"Tags: "
diff --git a/haunt/jakob/builder/blogroll.scm b/haunt/jakob/builder/blogroll.scm
index 866ee2b..53a0ecc 100644
--- a/haunt/jakob/builder/blogroll.scm
+++ b/haunt/jakob/builder/blogroll.scm
@@ -84,9 +84,9 @@ each tag is used."
(define* (render-entries title prefix entries #:optional tag)
"Return an SHTML document listing ENTRIES in PREFIX, with a header of TITLE."
#<(main
- `(h1 ,(if tag
- (format #f "~a - Tagged with \"~a\"" title tag)
- title))
+ (h1 ,(if tag
+ (format #f "~a - Tagged with \"~a\"" title tag)
+ title))
,(unless tag (render-tag-cloud prefix entries))
,(unless tag `(hr))
,@(map (lambda (entry)