aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/formats/sxcal.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/formats/sxcal.scm')
-rw-r--r--module/vcomponent/formats/sxcal.scm13
1 files changed, 9 insertions, 4 deletions
diff --git a/module/vcomponent/formats/sxcal.scm b/module/vcomponent/formats/sxcal.scm
index caf453ec..c02dbada 100644
--- a/module/vcomponent/formats/sxcal.scm
+++ b/module/vcomponent/formats/sxcal.scm
@@ -1,11 +1,16 @@
(define-module (vcomponent formats sxcal)
- :export (serialize deserialize)
- )
+ :use-module ((vcomponent formats xcal parse)
+ :select (sxcal->vcomponent))
+ :export (serialize deserialize)
+ )
(define (serialize component port)
- 'TODO
- )
+ (write (serialize/object component) port))
+
+(define (serialize/object component)
+ ;; TODO where is this defined?
+ (vcomponent->sxcal component))
(define (deserialize port)
(sxcal->vcomponent port))