summary refs log tree commit diff
path: root/gnu/tests/monitoring.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/tests/monitoring.scm')
-rw-r--r--gnu/tests/monitoring.scm14
1 files changed, 9 insertions, 5 deletions
diff --git a/gnu/tests/monitoring.scm b/gnu/tests/monitoring.scm
index ae0a8e0845..bbab1d8acf 100644
--- a/gnu/tests/monitoring.scm
+++ b/gnu/tests/monitoring.scm
@@ -208,11 +208,15 @@ postgres|Superuser, Create role, Create DB, Replication, Bypass RLS|{}
 zabbix||{}
 "
             (marionette-eval
-             '(begin (let* ((port (open-pipe #$%psql-db-zabbix-create-script
-                                             OPEN_READ))
-                            (output (read-string port))
-                            (status (close-pipe port)))
-                       output))
+             '(begin
+                (use-modules (ice-9 popen)
+                             (ice-9 rdelim))
+
+                (let* ((port (open-pipe #$%psql-db-zabbix-create-script
+                                        OPEN_READ))
+                       (output (read-string port))
+                       (status (close-pipe port)))
+                  output))
              marionette))
 
           (test-eq "postgres create zabbix db"