`(" "
(span (@ (style "margin: 0 3px")) ⦿)
(span (@ (class "tags"))
- ,@(map (lambda (tag)
- `((a (@ (href ,(format #f "tags/~a.html" tag))) ,tag) " "))
- tags)))))
+ ,@(drop-right
+ (apply
+ append
+ (map (lambda (tag)
+ `((a (@ (href ,(format #f "tags/~a.html" tag))) ,tag) ", "))
+ tags))
+ 1)))))
(else
div))))
(link (@ (rel "stylesheet") (href "https://fonts.googleapis.com/css?family=Merriweather+Sans:400,300,300italic,400italic,700,700italic,800,800italic|Merriweather:400,300,300italic,400italic,700,700italic,900,900italic|Source+Code+Pro:200,300,400,500,600,700,900")))
,(stylesheet "application.min")
,(stylesheet "pygments.min")
+ ,(stylesheet "custom")
(meta (@ (name "viewport") (content "width=device-width, initial-scale=1.0"))))
(body
,(let ((metadata (site-default-metadata site)))