A newerer beginning

1 files changed, 0 insertions, 45 deletions

@@ -1,45 +0,0 @@
-;;; (boudin config) --- default values for configuration options
-;;
-;; To change these, make a `config.scm' in your site's root directory and change
-;; these.  They're all parameters so .. change em like that.
-
-(define-library (boudin config)
-  (import (scheme base)
-          (boudin schmaltz)
-          ;; not portable
-          (chicken pathname)
-          (html-parser)
-          )
-
-  (export site-url site-dest
-          page-path-transformers page-text-transformers
-          page-template index-template feed-template)
-
-  (begin
-    ;; Site information
-    (define site-url
-      (make-parameter "example.com"))
-    (define site-dest
-      (make-parameter "out/"))
-    ;; Transformers
-    (define page-path-transformers
-      (make-parameter
-       (list (lambda (path) (make-pathname (site-dest) path)))))
-    (define page-text-transformers
-      (make-parameter
-       (list wrap-paragraphs
-             render-string
-             html->sxml)))
-    ;; Templates --- note that we use quote but include unquote forms here.
-    ;; This is to simplify the configuration and to avoid a cyclical dependency
-    ;; with (boudin types).
-    (define page-template
-      (make-parameter
-       '(html (@ (lang "en-us"))
-              (head (title (or (page-ref pg "title") "[untitled]")))
-              (body ,@(page-sxml pg)))))
-    (define index-template
-      (make-parameter 'todo))
-    (define feed-template
-      (make-parameter 'todo))
-    ))