aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/util/instance/methods.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-02-22 11:19:19 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2022-02-22 21:08:41 +0100
commit093ef72e6489d96fb6ffae8d58d7cb1cb7ff77ee (patch)
treed164e37c20e562588700d86379cfda1b0ca3c596 /module/vcomponent/util/instance/methods.scm
parentDatetime restrict imports. (diff)
downloadcalp-093ef72e6489d96fb6ffae8d58d7cb1cb7ff77ee.tar.gz
calp-093ef72e6489d96fb6ffae8d58d7cb1cb7ff77ee.tar.xz
Prepare code for translation.
Diffstat (limited to 'module/vcomponent/util/instance/methods.scm')
-rw-r--r--module/vcomponent/util/instance/methods.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/module/vcomponent/util/instance/methods.scm b/module/vcomponent/util/instance/methods.scm
index 120ab2fe..e2e8a777 100644
--- a/module/vcomponent/util/instance/methods.scm
+++ b/module/vcomponent/util/instance/methods.scm
@@ -11,6 +11,8 @@
:use-module ((vcomponent datetime) :select (ev-time<?))
:use-module (oop goops)
+ :use-module (calp translation)
+
:export (add-event
remove-event
@@ -50,7 +52,7 @@
(define-method (initialize (this <events>) args)
(next-method)
- (format (current-error-port) "Building <events> from~%")
+ (format (current-error-port) (_ "Building <events> from~%"))
(for calendar in (slot-ref this 'calendar-files)
(format (current-error-port) " - ~a~%" calendar))