From 8625b02b446dca35b0b1b5251f5193ce52d72220 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 23 Jun 2022 03:44:39 +0200 Subject: Remove all inline use-modules. --- module/vcomponent/recurrence/internal.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'module/vcomponent/recurrence/internal.scm') diff --git a/module/vcomponent/recurrence/internal.scm b/module/vcomponent/recurrence/internal.scm index 0503081c..2e04dd64 100644 --- a/module/vcomponent/recurrence/internal.scm +++ b/module/vcomponent/recurrence/internal.scm @@ -1,15 +1,19 @@ (define-module (vcomponent recurrence internal) #:export (repeating? format-recur-rule make-recur-rule) + #:use-module (srfi srfi-1) #:use-module (srfi srfi-71) #:use-module (srfi srfi-88) ; better keywords #:use-module ((vcomponent base) :select (prop)) + #:use-module (ice-9 i18n) #:use-module (srfi srfi-9) #:use-module (srfi srfi-9 gnu) #:use-module (ice-9 format) #:use-module (hnh util) + #:use-module (datetime) ) + ;; EXDATE is also a property linked to recurense rules ;; but that property alone don't create a recuring event. (define (repeating? ev) @@ -87,9 +91,6 @@ (week-day-name day 2 locale: (make-locale (list LC_TIME) "C")))))) -(use-modules (ice-9 i18n) - (datetime) - (srfi srfi-1)) (define (field->string field value) (case field -- cgit v1.2.3