◊; Because I deploy this site in a sub-directory (rather than a domain root) I ◊; have to use relative paths instead of absolute ones. Defining path-prefix ◊; is just my way of coping with this. ◊(define path-prefix (if (string-contains (symbol->string here) "/") "../" "")) ◊(define source-file (select-from-metas 'here-path metas))

◊(hash-ref metas 'title)

◊when/block[(select-from-metas 'author metas)]{

◊(hash-ref metas 'author)

} ◊(map ->html (select-from-doc 'body here))