Вы не можете выбрать более 25 тем
Темы должны начинаться с буквы или цифры, могут содержать дефисы(-) и должны содержать не более 35 символов.
123456789101112131415 |
- (module build (build-posts build-post)
- (import scheme (chicken io))
-
- (import config paths)
-
- (define (build-post config post)
- (let* ([path (car post)]
- [content (cdr post)]
- [absolute-path (absolute-build-path config path)])
- (call-with-output-file
- absolute-path
- (lambda (port) (write-string content #f port)))))
-
- (define (build-posts config posts)
- (map (lambda (post) (build-post config post)) posts)))
|