blob: 1272cea15ae10d3079c14eb669bbb7dbf11e93e8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
(define-module (vcomponent)
:use-module (util)
:use-module (util config)
:use-module (vcomponent base)
:use-module (vcomponent parse)
:use-module (vcomponent instance methods)
:re-export (make-vcomponent
parse-cal-path parse-calendar))
(re-export-modules (vcomponent base)
(vcomponent instance methods))
(define-config calendar-files '()
"Which files to parse. Takes a list of paths or a single string which will be globbed."
pre: (lambda (v)
(cond [(list? v) v]
[(string? v) ((@ (glob) glob) v)]
[else #f])))
|