- (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))))
|