aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/instance.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/instance.scm')
-rw-r--r--module/vcomponent/instance.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/module/vcomponent/instance.scm b/module/vcomponent/instance.scm
index 2128b303..88858709 100644
--- a/module/vcomponent/instance.scm
+++ b/module/vcomponent/instance.scm
@@ -14,3 +14,9 @@
(define-once global-event-object
(make (@@ (vcomponent instance methods) <events>)
calendar-files: (get-config 'calendar-files)))
+
+(define-public (reload)
+ (let ((new-value (make (@@ (vcomponent instance methods) <events>)
+ calendar-files: (get-config 'calendar-files))))
+ (display "Reload done\n" (current-error-port))
+ (set! global-event-object new-value)))