use table for my-collection-template
authorAmin Bandali <bandali@gnu.org>
Sat, 30 Nov 2019 06:52:04 +0000 (01:52 -0500)
committerAmin Bandali <bandali@gnu.org>
Sat, 30 Nov 2019 06:53:05 +0000 (01:53 -0500)
haunt.scm

index bb6079e..f2a06d0 100644 (file)
--- a/haunt.scm
+++ b/haunt.scm
     (string-append (or prefix "") "/"
                    (site-post-slug site post) ".html"))
 
     (string-append (or prefix "") "/"
                    (site-post-slug site post) ".html"))
 
-  `((h3 ,title)
-    (ul
-     ,@(map (lambda (post)
-              `(li
-                ,(aa (post-ref post 'title) (post-uri post))
-                " — "
-                ,(date->string (post-date post) my-date-format)))
-            posts))))
+  `((h2 ,title)
+    (table
+     (@ (class "post-list"))
+     (tbody
+      ,@(map (lambda (post)
+               `(tr
+                 (td ,(aa (post-ref post 'title) (post-uri post)))
+                 (td (@ (style "font-size: 0.875em;"))
+                     ,(date->string (post-date post) my-date-format))))
+             posts)))))
 
 (define bandali-theme
   (theme #:name "bandali"
 
 (define bandali-theme
   (theme #:name "bandali"