aliens/tekuti
1
0
Fork 0
Code Activity

Improve the look of the post meta info

Browse source 
* tekuti/page-helpers.scm (show-post): Show meta info in the `h1' in a
  `small' block, not in a `h3'.
This commit is contained in:
Tom Willemsen 2012-08-25 21:32:15 +02:00
parent 428ea7c3b0
commit 6030bc2cdc
1 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
tekuti/page-helpers.scm
View file

@ -268,14 +268,13 @@
(define (show-post post comments?) (define (show-post post comments?)
`((h2 (@ (class "storytitle")) `((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")) (div (@ (class "post"))
(h3 (@ (class "meta"))
,(post-readable-date post)
" (" ,@(list-intersperse
(map tag-link (post-tags post))
" | ")
")")
(div (@ (class "storycontent")) (div (@ (class "storycontent"))
,(post-sxml-content post)) ,(post-sxml-content post))
,@(if comments? ,@(if comments?