blob: dddca946e6fcf96d8c9a499dd61d1a760f2298ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
(define-module (vcomponent formats ical)
:use-module ((vcomponent formats ical output)
:select (component->ical-string))
:use-module ((vcomponent formats ical parse)
:select (parse-calendar))
:export (serialize
deserialize
)
)
(define (serialize component port)
(with-output-to-port port
(lambda () (component->ical-string component))))
(define (deserialize port)
(parse-calendar port))
|