From f12fca91b185cbf83fbe173fadf6a46f6c3c0c65 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 17 Aug 2020 18:39:53 +0200 Subject: Fixes. --- module/vcomponent/vdir/parse.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'module/vcomponent/vdir/parse.scm') diff --git a/module/vcomponent/vdir/parse.scm b/module/vcomponent/vdir/parse.scm index ae4ea692..c4b1b694 100644 --- a/module/vcomponent/vdir/parse.scm +++ b/module/vcomponent/vdir/parse.scm @@ -4,7 +4,7 @@ ;; (vcomponent parse ical) handles reading data from icalendar files. ;;; Code: -(define-module (vcomponent parse) +(define-module (vcomponent vdir parse) :use-module (srfi srfi-1) :use-module ((ice-9 hash-table) :select (alist->hash-table)) @@ -24,7 +24,7 @@ ;; All VTIMEZONE's seem to be in "local" time in relation to ;; themselves. Therefore, a simple comparison should work, ;; and then the TZOFFSETTO properties can be subtd. -(define (parse-vdir path) +(define-public (parse-vdir path) (let ((/ (lambda args (string-join args file-name-separator-string 'infix)))) (let ((color (catch 'system-error -- cgit v1.2.3