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 'module/vcomponent/formats/xcal.scm')
| -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)) |