src/wrap.scm


1
2
3
4
5
6
7
8
9
10
11
12
13

(declare (module (jimmy wrap)))

(import scheme (chicken base)
        (jimmy util)
        (chicken format))

;;; open question: how to do templating?

(define-public (wrap document template)
  #f)

(define (meta-get key document)
  (alist-walk document 'meta key))