From 8ce606878812cfbd4be0c1aa58ead8141b0f3f46 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 11 Apr 2022 19:41:31 +0200 Subject: Translate newly added strings. --- module/vcomponent/formats/vdir/save-delete.scm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'module/vcomponent') diff --git a/module/vcomponent/formats/vdir/save-delete.scm b/module/vcomponent/formats/vdir/save-delete.scm index ee97f331..82f678da 100644 --- a/module/vcomponent/formats/vdir/save-delete.scm +++ b/module/vcomponent/formats/vdir/save-delete.scm @@ -31,7 +31,10 @@ (unless (eq? 'vdir (prop calendar '-X-HNH-SOURCETYPE)) (scm-error 'wrong-type-arg "save-event" - (_ "Can only save events belonging to vdir calendars. Calendar is of type ~s") + (string-append + (_ "Can only save events belonging to vdir calendars.") + " " + (_ "Calendar is of type ~s")) (list (prop calendar '-X-HNH-SOURCETYPE)) #f)) @@ -51,7 +54,9 @@ (define calendar (parent event)) (unless (eq? 'vdir (prop calendar '-X-HNH-SOURCETYPE)) (scm-error 'wrong-type-arg "remove-event" - (_ "Can only remove events belonging to vdir calendars. Calendar is of type ~s") + (string-append (_ "Can only remove events belonging to vdir calendars.") + " " + (_ "Calendar is of type ~s")) (list (prop calendar '-X-HNH-SOURCETYPE)) #f)) (delete-file (prop event '-X-HNH-FILENAME))) -- cgit v1.2.3