From 4afd814f7c5675b658200f9b1c9625870fd17b86 Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Sun, 18 Aug 2024 11:07:22 -0300 Subject: tests/internet/system.scm: Use string-append over pkg:str It seems that the import has not been loaded at the stage where the ,(path) is being evaluated. --- tests/internet/system.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/internet/system.scm b/tests/internet/system.scm index 84471d2..e7b2c8c 100644 --- a/tests/internet/system.scm +++ b/tests/internet/system.scm @@ -12,7 +12,7 @@ ssh) (define (path s) - (pkg:str (dirname (dirname (dirname (current-filename)))) "/" s)) + (string-append (dirname (dirname (dirname (current-filename)))) "/" s)) (define +users+ `(("user1" "I'm a user" ()) -- cgit v1.2.3