blob: b4a30c837c75d5e1534b0b2fd331d4f25a024854 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
(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 '()
description: "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])))
(define-config default-calendar ""
description: "Default calendar to use for operations. Set to empty string to unset"
pre: (ensure string?))
|