From aef7d93cb4d31db6f23477b71e26c0b08e25749c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 4 Mar 2022 01:58:11 +0100
Subject: Add missing (ice-9 format) imports.

---
 module/c/cpp.scm                          | 1 +
 module/calp/entry-points/import.scm       | 1 +
 module/calp/entry-points/server.scm       | 1 +
 module/calp/html/vcomponent.scm           | 1 +
 module/calp/html/view/calendar.scm        | 2 ++
 module/calp/html/view/calendar/shared.scm | 1 +
 module/calp/html/view/calendar/week.scm   | 1 +
 module/calp/server/routes.scm             | 1 +
 module/calp/util/time.scm                 | 1 +
 module/crypto.scm                         | 1 +
 module/vcomponent/formats/ical/parse.scm  | 1 +
 module/vcomponent/recurrence/internal.scm | 1 +
 12 files changed, 13 insertions(+)

(limited to 'module')

diff --git a/module/c/cpp.scm b/module/c/cpp.scm
index c782e468..8710fdd2 100644
--- a/module/c/cpp.scm
+++ b/module/c/cpp.scm
@@ -6,6 +6,7 @@
   :use-module (ice-9 regex)
   :use-module ((rnrs io ports) :select (call-with-port))
   :use-module (ice-9 pretty-print) ; used by one error handler
+  :use-module (ice-9 format)
   :use-module ((hnh util io) :select (read-lines))
   :use-module (hnh util graph)
   :use-module (c lex)
diff --git a/module/calp/entry-points/import.scm b/module/calp/entry-points/import.scm
index 441ff527..213a720d 100644
--- a/module/calp/entry-points/import.scm
+++ b/module/calp/entry-points/import.scm
@@ -4,6 +4,7 @@
   :use-module (hnh util options)
   :use-module (ice-9 getopt-long)
   :use-module (ice-9 rdelim)
+  :use-module (ice-9 format)
   :use-module (srfi srfi-1)
   ;; TODO FIX
   ;; :use-module (output vdir)
diff --git a/module/calp/entry-points/server.scm b/module/calp/entry-points/server.scm
index c9ff339a..4c5637f3 100644
--- a/module/calp/entry-points/server.scm
+++ b/module/calp/entry-points/server.scm
@@ -6,6 +6,7 @@
   :use-module (srfi srfi-1)
 
   :use-module (ice-9 getopt-long)
+  :use-module (ice-9 format)
 
   :use-module ((calp server server) :select (start-server))
 
diff --git a/module/calp/html/vcomponent.scm b/module/calp/html/vcomponent.scm
index 16f418c5..28024af2 100644
--- a/module/calp/html/vcomponent.scm
+++ b/module/calp/html/vcomponent.scm
@@ -24,6 +24,7 @@
                                       ))
   :use-module ((calp util config) :select (get-config))
   :use-module ((base64) :select (base64encode))
+  :use-module (ice-9 format)
   )
 
 ;; used by search view
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm
index ecdce291..76cdf736 100644
--- a/module/calp/html/view/calendar.scm
+++ b/module/calp/html/view/calendar.scm
@@ -27,6 +27,8 @@
   :use-module ((vcomponent util group)
                :select (group-stream get-groups-between))
   :use-module ((base64) :select (base64encode))
+
+  :use-module (ice-9 format)
   )
 
 
diff --git a/module/calp/html/view/calendar/shared.scm b/module/calp/html/view/calendar/shared.scm
index 11f1a70c..b00888a9 100644
--- a/module/calp/html/view/calendar/shared.scm
+++ b/module/calp/html/view/calendar/shared.scm
@@ -16,6 +16,7 @@
                :select (btn tabset))
   :use-module ((calp html vcomponent)
                :select (make-block) )
+  :use-module (ice-9 format)
   )
 
 
diff --git a/module/calp/html/view/calendar/week.scm b/module/calp/html/view/calendar/week.scm
index 5b12a351..38e7501b 100644
--- a/module/calp/html/view/calendar/week.scm
+++ b/module/calp/html/view/calendar/week.scm
@@ -19,6 +19,7 @@
   ;;              :select ())
   :use-module ((vcomponent util group)
                :select (group-stream get-groups-between))
+  :use-module (ice-9 format)
   )
 
 
diff --git a/module/calp/server/routes.scm b/module/calp/server/routes.scm
index 87af983a..3fa9bc4d 100644
--- a/module/calp/server/routes.scm
+++ b/module/calp/server/routes.scm
@@ -9,6 +9,7 @@
   :use-module ((ice-9 rdelim) :select (read-string))
   :use-module ((ice-9 ftw) :select (scandir))
   :use-module (ice-9 regex) #| regex here due to bad macros |#
+  :use-module (ice-9 format)
 
   :use-module ((web response) :select (build-response))
   :use-module ((web uri) :select (build-relative-ref))
diff --git a/module/calp/util/time.scm b/module/calp/util/time.scm
index 0a624d30..f3789eeb 100644
--- a/module/calp/util/time.scm
+++ b/module/calp/util/time.scm
@@ -1,5 +1,6 @@
 (define-module (calp util time)
   :use-module (ice-9 match)
+  :use-module (ice-9 format)
   :export (report-time! profile!))
 
 
diff --git a/module/crypto.scm b/module/crypto.scm
index 3e468018..6428f16d 100644
--- a/module/crypto.scm
+++ b/module/crypto.scm
@@ -1,6 +1,7 @@
 (define-module (crypto)
   :use-module (rnrs bytevectors)
   :use-module (system foreign)
+  :use-module (ice-9 format)
   :export (sha256 checksum->string))
 
 (define-once libcrypto (dynamic-link "libcrypto"))
diff --git a/module/vcomponent/formats/ical/parse.scm b/module/vcomponent/formats/ical/parse.scm
index 34812a2c..30a1837f 100644
--- a/module/vcomponent/formats/ical/parse.scm
+++ b/module/vcomponent/formats/ical/parse.scm
@@ -1,5 +1,6 @@
 (define-module (vcomponent formats ical parse)
   :use-module ((ice-9 rdelim) :select (read-line))
+  :use-module (ice-9 format)
   :use-module (hnh util exceptions)
   :use-module (hnh util)
   :use-module (datetime)
diff --git a/module/vcomponent/recurrence/internal.scm b/module/vcomponent/recurrence/internal.scm
index b4f09d92..e673288d 100644
--- a/module/vcomponent/recurrence/internal.scm
+++ b/module/vcomponent/recurrence/internal.scm
@@ -5,6 +5,7 @@
   #:use-module ((vcomponent base) :select (prop))
   #:use-module (srfi srfi-9)
   #:use-module (srfi srfi-9 gnu)
+  #:use-module (ice-9 format)
   #:use-module (hnh util)
   )
 
-- 
cgit v1.2.3