summary refs log tree commit diff
path: root/etc/system-tests.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-03-22 18:47:48 +0100
committerLudovic Courtès <ludo@gnu.org>2020-03-23 00:06:58 +0100
commit8b18f5cb309f670b08ad35df6425f4e9e19d8a82 (patch)
tree8cbca05a43976c0c4183c358ee9f934f00fed658 /etc/system-tests.scm
parentd4842a7c478230b7c12e65d04106db1e14c98cac (diff)
downloadguix-8b18f5cb309f670b08ad35df6425f4e9e19d8a82.tar.gz
tests: Use the same source as ci.guix.gnu.org.
* etc/system-tests.scm (system-test-manifest): In 'local-file' call, use
a name that is a function of COMMIT to match what Cuirass does.
Diffstat (limited to 'etc/system-tests.scm')
-rw-r--r--etc/system-tests.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/etc/system-tests.scm b/etc/system-tests.scm
index ab2827e70a..1085deed24 100644
--- a/etc/system-tests.scm
+++ b/etc/system-tests.scm
@@ -79,7 +79,11 @@ the 'TESTS' environment variable."
   ;; Intern SOURCE so that 'build-from-source' in (guix channels) sees
   ;; "fresh" file names and thus doesn't find itself loading .go files
   ;; from ~/.cache/guile when it loads 'build-aux/build-self.scm'.
-  (let* ((source (local-file source "guix-source"
+  (let* ((source (local-file source
+                             (if commit
+                                 (string-append "guix-"
+                                                (string-take commit 7))
+                                 "guix-source")
                              #:recursive? #t
                              #:select?
                              (or (git-predicate source)