summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2026-06-04 23:54:40 +0200
committerLudovic Courtès <ludo@gnu.org>2026-06-18 16:46:52 +0200
commitc263c41668a4071e981fcfae3faa4b6ce741fb46 (patch)
treeba1cca417c79154be32977faa44f1c3bde6fb529 /tests
parent50fb72597db3448c13c74f33f864b00c7da977fd (diff)
tests: Fix gexp test involving ‘load*’.
Fixes a regression introduced in 94ae360ab4039afc8c942e77ba495705850c1e65, which left the test broken. * tests/gexp.scm ("local-file, relative file name, within gexp, compiled"): Remove reference to ‘module’ variable. Adjust second argument to ‘load*’. Change-Id: If7889645a0d5b0678a92e4c2e009ae0f54df6bee Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'tests')
-rw-r--r--tests/gexp.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/tests/gexp.scm b/tests/gexp.scm
index bc75d479b44..fcc269d75a7 100644
--- a/tests/gexp.scm
+++ b/tests/gexp.scm
@@ -282,9 +282,8 @@
282 port))) 282 port)))
283 283
284 (let* ((interned (add-to-store %store "t.scm" #f "sha256" file))) 284 (let* ((interned (add-to-store %store "t.scm" #f "sha256" file)))
285 (module-use! module (resolve-interface '(guix gexp)))
286 (equal? `(this file is ,interned) 285 (equal? `(this file is ,interned)
287 (gexp->sexp* (load* file '())))))) 286 (gexp->sexp* (load* file '((guix gexp))))))))
288 287
289(test-assertm "local-file, #:select?" 288(test-assertm "local-file, #:select?"
290 (mlet* %store-monad ((select? -> (lambda (file stat) 289 (mlet* %store-monad ((select? -> (lambda (file stat)