aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/ical/types.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2021-12-21 16:17:28 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2021-12-22 22:58:30 +0100
commitd00fea566004e67161ee45246b239fff5d416b0e (patch)
tree5641c0c0d0e78b046b6045ed2440512f12259560 /module/vcomponent/ical/types.scm
parentComplete rewrite of use2dot (diff)
downloadcalp-d00fea566004e67161ee45246b239fff5d416b0e.tar.gz
calp-d00fea566004e67161ee45246b239fff5d416b0e.tar.xz
Cleanup modules.
Primarly this moves all vcompenent input and output code to clearly labeled modules, instead of being spread out. At the same time it also removes a handfull of unused procedures.
Diffstat (limited to '')
-rw-r--r--module/vcomponent/formats/ical/types.scm (renamed from module/vcomponent/ical/types.scm)8
1 files changed, 4 insertions, 4 deletions
diff --git a/module/vcomponent/ical/types.scm b/module/vcomponent/formats/ical/types.scm
index 1ec9d0bd..d063ca8f 100644
--- a/module/vcomponent/ical/types.scm
+++ b/module/vcomponent/formats/ical/types.scm
@@ -1,10 +1,12 @@
;; see (vcomponent parse types)
-(define-module (vcomponent ical types)
+(define-module (vcomponent formats ical types)
:use-module (calp util)
:use-module (calp util exceptions)
:use-module (base64)
- :use-module (datetime))
+ :use-module (datetime)
+ :use-module (datetime timespec))
+;; TODO shouldn't these really take vline:s?
(define (write-binary _ value)
(bytevector->base64-string value))
@@ -62,8 +64,6 @@
value)
-(use-modules (datetime timespec))
-
(define (write-utc-offset _ value)
(with-output-to-string
(lambda ()