(table
(@ (class "post-list"))
(tbody
- ,@(map
- (lambda (post)
- (define (post-uri post)
- (string-append "/"
- (site-post-slug site post) ".html"))
- `(tr
- (td ,(aa (post-ref post 'title) (post-uri post)))
- (td (small
- ,(date->string (post-date post) my-date-format)))))
- (take-up-to 10 (posts/reverse-chronological posts)))))))
+ ,@(map
+ (lambda (post)
+ (define (post-uri post)
+ (string-append "/"
+ (site-post-slug site post) ".html"))
+ `(tr
+ (td ,(aa (post-ref post 'title) (post-uri post)))
+ (td (small
+ ,(date->string (post-date post) my-date-format)))))
+ (take-up-to 10 (posts/reverse-chronological posts)))))))
(define (index-page site posts)
(make-page
}
a {
- color: #204a87;
+ color: #004caa;
padding: 0.3em 0;
text-decoration: underline #ccc;
}
}
table td {
- padding: 0.2em 0.3em;
+ padding: 0.125em 0.3em;
}
table td:first-child {
padding-left: 0;
width: 100%;
}
.post-list tr:hover {
- background: #f8f8f8;
+ background: #fafafa;
}
.post-list td {
- padding: 0.3em;
+ padding: 0.25em 0;
}
.post-list td:nth-child(2) {
text-align: right;