(haunt builder blog)
(haunt builder atom)
(haunt builder assets)
+ (haunt html)
+ (haunt page)
(haunt reader)
(haunt reader texinfo)
(haunt site)
`(link (@ (rel "stylesheet")
(href ,(string-append "css/" name ".css")))))
+(define (static-page title file-name body)
+ (lambda (site posts)
+ (make-page file-name
+ (with-layout flex-theme site title body)
+ sxml->html)))
+
(define flex-theme
(theme #:name "Flex"
#:layout
`(li (a (@ (href ,(cdr page))) ,(car page))))
(assoc-ref metadata 'pages))))
(ul (@ (class "social"))
- (li (a (@ (class "sc-linkedin") (target "_blank") (href "")) (i (@ (class "fa fa-linkedin")))))
- " "
- (li (a (@ (class "sc-github") (target "_blank") (href "")) (i (@ (class "fa fa-github")))))
- " "
- (li (a (@ (class "sc-twitter") (target "_blank") (href "")) (i (@ (class "fa fa-twitter")))))
+ (li (a (@ (class "sc-twitter") (target "_blank") (href "https://twitter.com/jsancho_gpl")) (i (@ (class "fa fa-twitter")))))
" "
(li (a (@ (class "sc-rss") (target "_blank") (href "feed.xml")) (i (@ (class "fa fa-rss")))))))))
(main ,body)))))
(hr)))
(posts/reverse-chronological posts))))))
+(define about-page
+ (static-page
+ "About me"
+ "about.html"
+ `((h2 "hi."))))
+
(define %collections
`(("Home" "index.html" ,posts/reverse-chronological)))
#:builders (list (blog #:theme flex-theme #:collections %collections)
(atom-feed)
(atom-feeds-by-tag)
+ about-page
(static-directory "images")
(static-directory "fonts")
(static-directory "css")))