diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-11-05 16:09:17 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-11-05 16:13:50 +0100 |
| commit | a4e7749e91c5ed9b96117e3bcda8802e8744841e (patch) | |
| tree | 147c9031da648861dd432a3f7ab8d9742d784aa4 /gnu/services/monitoring.scm | |
| parent | 4db90a6c1571eac16f8f304a41e82f576b351a55 (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/services/monitoring.scm')
| -rw-r--r-- | gnu/services/monitoring.scm | 7 |
1 files changed, 3 insertions, 4 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)) |
