diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-12-13 11:06:57 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-12-13 11:17:34 +0100 |
commit | 00a66eca0f32fcf585d2c21375641020e877e3ea (patch) | |
tree | c2aceeb5047bf46e03726e1c5e8378cf86a4df63 /module/vcomponent/formats/xcal.scm | |
parent | Fix sxml namespaced util. (diff) | |
download | calp-sxml-work.tar.gz calp-sxml-work.tar.xz |
Update things depending on namespaced sxml.sxml-work
Update all code to emit correctly formed namespaced sxml objects,
instead of the old list based approach.
Also introduces a number of typechecks which in semi-related parts of
the code.
Note that the webdav-server test is currently broken.
Diffstat (limited to '')
-rw-r--r-- | module/vcomponent/formats/xcal.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/module/vcomponent/formats/xcal.scm b/module/vcomponent/formats/xcal.scm index 8fadde75..a0c8620d 100644 --- a/module/vcomponent/formats/xcal.scm +++ b/module/vcomponent/formats/xcal.scm @@ -23,6 +23,9 @@ (define* (deserialize port) (-> port xml->namespaced-sxml - root-element ; Strip potential *TOP* - cadr ; Remove containing icalendar + xml-document-root + + ;; Remove containing icalendar + xml-element-children car + sxcal->vcomponent)) |