aboutsummaryrefslogtreecommitdiff
path: root/module/output/ical.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-08-02 23:45:29 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-08-02 23:45:29 +0200
commitf3825a583b218a02078d2f1adcf6d4db3e418996 (patch)
tree6703dda24d00bd724be405bda0019bd0c8eb9c29 /module/output/ical.scm
parentRemove (util app). (diff)
downloadcalp-f3825a583b218a02078d2f1adcf6d4db3e418996.tar.gz
calp-f3825a583b218a02078d2f1adcf6d4db3e418996.tar.xz
Module cleanup.
Diffstat (limited to 'module/output/ical.scm')
-rw-r--r--module/output/ical.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/output/ical.scm b/module/output/ical.scm
index 9ab80ffb..94622e2f 100644
--- a/module/output/ical.scm
+++ b/module/output/ical.scm
@@ -221,7 +221,7 @@ CALSCALE:GREGORIAN\r
(print-footer))
-(define (print-all-events)
+(define-public (print-all-events)
(print-components-with-fake-parent
(append (get-fixed-events global-event-object)
;; TODO RECCURENCE-ID exceptions
@@ -230,7 +230,7 @@ CALSCALE:GREGORIAN\r
;; the given date range.
(get-repeating-events global-even-object))))
-(define (print-events-in-interval start end)
+(define-public (print-events-in-interval start end)
(print-components-with-fake-parent
(append (fixed-events-in-range start end)
;; TODO RECCURENCE-ID exceptions