From 218f6eccafa8172221cf7efd5262107233e7a587 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Thu, 31 Aug 2017 23:27:26 +0200 Subject: substitute: Make substitute URLs a SRFI-39 parameter. * guix/scripts/substitute.scm (%cache-urls): Rename to... (%default-substitute-urls): ... this. (substitute-urls): New variable. (guix-substitute): Use it instead of %CACHE-URLS. * tests/substitute.scm: Likewise. --- tests/substitute.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'tests/substitute.scm') diff --git a/tests/substitute.scm b/tests/substitute.scm index 69b272f2bb..b1d0fe9316 100644 --- a/tests/substitute.scm +++ b/tests/substitute.scm @@ -167,8 +167,7 @@ a file for NARINFO." (call-with-narinfo narinfo (lambda () body ...))) ;; Transmit these options to 'guix substitute'. -(set! (@@ (guix scripts substitute) %cache-urls) - (list (getenv "GUIX_BINARY_SUBSTITUTE_URL"))) +(substitute-urls (list (getenv "GUIX_BINARY_SUBSTITUTE_URL"))) (test-equal "query narinfo without signature" "" ; not substitutable -- cgit v1.2.3