From 6030bc2cdc265754d3976011a4d3ad084a11b37e Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Sat, 25 Aug 2012 21:32:15 +0200 Subject: Improve the look of the post meta info * tekuti/page-helpers.scm (show-post): Show meta info in the `h1' in a `small' block, not in a `h3'. --- tekuti/page-helpers.scm | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/tekuti/page-helpers.scm b/tekuti/page-helpers.scm index 20e36a9..b2ad60f 100644 --- a/tekuti/page-helpers.scm +++ b/tekuti/page-helpers.scm @@ -268,14 +268,13 @@ (define (show-post post comments?) `((h2 (@ (class "storytitle")) - ,(post-link post)) + ,(post-link post) (br) + (small ,(post-readable-date post) + " (" ,@(list-intersperse + (map tag-link (post-tags post)) + " | ") + ")")) (div (@ (class "post")) - (h3 (@ (class "meta")) - ,(post-readable-date post) - " (" ,@(list-intersperse - (map tag-link (post-tags post)) - " | ") - ")") (div (@ (class "storycontent")) ,(post-sxml-content post)) ,@(if comments? -- cgit v1.2.3-54-g00ecf