(module config * (import scheme) (import (chicken base)) (define-record config posts-dir build-dir) (define (build-config args) (let* ([source-dir (car args)] [posts-dir (string-append source-dir "/posts")] [build-dir (string-append source-dir "/build")]) (make-config posts-dir build-dir))))