aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/formats/xcal.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-10-16 15:21:32 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2023-10-16 15:21:32 +0200
commite96963ab77c6c3d4c12ea00dd4e6906121fb228f (patch)
tree4ab22dc1cc7e3155ebc5e31fc00a2dd4efafe0dc /module/vcomponent/formats/xcal.scm
parentRemove some old debug prints. (diff)
downloadcalp-e96963ab77c6c3d4c12ea00dd4e6906121fb228f.tar.gz
calp-e96963ab77c6c3d4c12ea00dd4e6906121fb228f.tar.xz
Fixen in vcomponent formats.
Previously almost everything was broken. This takes it back to a somewhat working state.
Diffstat (limited to 'module/vcomponent/formats/xcal.scm')
-rw-r--r--module/vcomponent/formats/xcal.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/module/vcomponent/formats/xcal.scm b/module/vcomponent/formats/xcal.scm
index 29a1d92f..8fadde75 100644
--- a/module/vcomponent/formats/xcal.scm
+++ b/module/vcomponent/formats/xcal.scm
@@ -8,8 +8,9 @@
:use-module ((hnh util) :select (->))
:export (serialize deserialize))
+(define-public xcal (string->symbol "urn:ietf:params:xml:ns:icalendar-2.0"))
-(define* (serialize component port key: (namespaces '()))
+(define* (serialize component port key: (namespaces `((,xcal . xcal))))
(-> (vcomponent->sxcal component)
ns-wrap
(namespaced-sxml->xml port: port