aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/formats/xcal.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-04-12 11:18:25 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2023-04-12 11:51:08 +0200
commit81fc535b2b8cb2a726c8514f2ae91e913ac157c7 (patch)
treed37e85a0f87f9a3464f5e57c4de1241d671faf1c /module/vcomponent/formats/xcal.scm
parentUNFINISHED work on formats. (diff)
downloadcalp-81fc535b2b8cb2a726c8514f2ae91e913ac157c7.tar.gz
calp-81fc535b2b8cb2a726c8514f2ae91e913ac157c7.tar.xz
UNFINISHED work on data stores and formats.
Diffstat (limited to 'module/vcomponent/formats/xcal.scm')
-rw-r--r--module/vcomponent/formats/xcal.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/module/vcomponent/formats/xcal.scm b/module/vcomponent/formats/xcal.scm
index 2732a5a7..cfc70a92 100644
--- a/module/vcomponent/formats/xcal.scm
+++ b/module/vcomponent/formats/xcal.scm
@@ -14,6 +14,9 @@
(sxml->xml port)
))
+(define (serialize/object component)
+ (call-with-output-string (lambda (p) (serialize component p))))
+
(define (deserialize port)
(-> (xml->sxml port)