summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-11-05 16:09:17 +0100
committerLudovic Courtès <ludo@gnu.org>2020-11-05 16:13:50 +0100
commita4e7749e91c5ed9b96117e3bcda8802e8744841e (patch)
tree147c9031da648861dd432a3f7ab8d9742d784aa4 /gnu
parent4db90a6c1571eac16f8f304a41e82f576b351a55 (diff)
services: Remove imports of (ice-9 …) modules.
* gnu/services/monitoring.scm (zabbix-server-activation): Remove (ice-9 rdelim) from the imported modules. (zabbix-agent-activation): Likewise. * gnu/tests/mail.scm (run-exim-test)[test]: Remove (ice-9 ftw) from the imported modules.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/services/monitoring.scm7
-rw-r--r--gnu/tests/mail.scm3
2 files changed, 4 insertions, 6 deletions
diff --git a/gnu/services/monitoring.scm b/gnu/services/monitoring.scm
index 511f4fb2fe0..da3d736ba6f 100644
--- a/gnu/services/monitoring.scm
+++ b/gnu/services/monitoring.scm
@@ -279,11 +279,11 @@ configuration file."))
279 279
280(define (zabbix-server-activation config) 280(define (zabbix-server-activation config)
281 "Return the activation gexp for CONFIG." 281 "Return the activation gexp for CONFIG."
282 (with-imported-modules '((guix build utils) 282 (with-imported-modules '((guix build utils))
283 (ice-9 rdelim))
284 #~(begin 283 #~(begin
285 (use-modules (guix build utils) 284 (use-modules (guix build utils)
286 (ice-9 rdelim)) 285 (ice-9 rdelim))
286
287 (let ((user (getpw #$(zabbix-server-configuration-user config)))) 287 (let ((user (getpw #$(zabbix-server-configuration-user config))))
288 (for-each (lambda (file) 288 (for-each (lambda (file)
289 (let ((directory (dirname file))) 289 (let ((directory (dirname file)))
@@ -393,8 +393,7 @@ configuration file."))
393 393
394(define (zabbix-agent-activation config) 394(define (zabbix-agent-activation config)
395 "Return the activation gexp for CONFIG." 395 "Return the activation gexp for CONFIG."
396 (with-imported-modules '((guix build utils) 396 (with-imported-modules '((guix build utils))
397 (ice-9 rdelim))
398 #~(begin 397 #~(begin
399 (use-modules (guix build utils) 398 (use-modules (guix build utils)
400 (ice-9 rdelim)) 399 (ice-9 rdelim))
diff --git a/gnu/tests/mail.scm b/gnu/tests/mail.scm
index a50fb1dbca1..eb8952b33a8 100644
--- a/gnu/tests/mail.scm
+++ b/gnu/tests/mail.scm
@@ -205,8 +205,7 @@ acl_check_data:
205 (port-forwardings '((1025 . 25))))) 205 (port-forwardings '((1025 . 25)))))
206 206
207 (define test 207 (define test
208 (with-imported-modules '((gnu build marionette) 208 (with-imported-modules '((gnu build marionette))
209 (ice-9 ftw))
210 #~(begin 209 #~(begin
211 (use-modules (rnrs base) 210 (use-modules (rnrs base)
212 (srfi srfi-64) 211 (srfi srfi-64)