repl: Look for script files in (getcwd).

[jackhill/guix/guix.git] / tests / guix-repl.sh

diff --git a/tests/guix-repl.sh b/tests/guix-repl.sh
index e1c2b82..d4ebb5f 100644 (file)
--- a/tests/guix-repl.sh
+++ b/tests/guix-repl.sh
@@ -45,6 +45,10 @@ EOF
 
 test "`guix repl "$tmpfile"`" = "coreutils"
 
+# Make sure that the file can also be loaded when passed as a relative file
+# name.
+(cd "$(dirname "$tmpfile")"; test "$(guix repl "$(basename "$tmpfile")")" = "coreutils")
+
 
 cat > "$module_dir/foo.scm"<<EOF
 (define-module (foo)