From 8625b02b446dca35b0b1b5251f5193ce52d72220 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Thu, 23 Jun 2022 03:44:39 +0200
Subject: Remove all inline use-modules.

---
 module/calp/entry-points/tidsrapport.scm  | 25 +++++++++++--------------
 module/vcomponent/recurrence/internal.scm |  7 ++++---
 2 files changed, 15 insertions(+), 17 deletions(-)

diff --git a/module/calp/entry-points/tidsrapport.scm b/module/calp/entry-points/tidsrapport.scm
index a05c3b78..a50f0659 100644
--- a/module/calp/entry-points/tidsrapport.scm
+++ b/module/calp/entry-points/tidsrapport.scm
@@ -38,26 +38,23 @@
 
 
 (define-module (calp entry-points tidsrapport)
-  :export (main)
   :use-module (hnh util)
   :use-module (hnh util options)
   :use-module (ice-9 getopt-long)
   :use-module (calp translation)
   :use-module (sxml simple)
   :use-module (datetime)
-  )
-
-(use-modules (srfi srfi-41)
-             (srfi srfi-41 util)
-             (srfi srfi-1)
-             (vcomponent)
-             (datetime)
-             (vcomponent util instance)
-             (vcomponent util instance methods)
-             (hnh util)
-             (ice-9 regex)
-             (ice-9 popen)
-             )
+  :use-module (srfi srfi-41)
+  :use-module (srfi srfi-41 util)
+  :use-module (srfi srfi-1)
+  :use-module (vcomponent)
+  :use-module (datetime)
+  :use-module (vcomponent util instance)
+  :use-module (vcomponent util instance methods)
+  :use-module (hnh util)
+  :use-module (ice-9 regex)
+  :use-module (ice-9 popen)
+  :export (main))
 
 
 (define event-set
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