aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-12-21 12:06:11 +0100
committerLudovic Courtès <ludo@gnu.org>2020-12-21 17:47:35 +0100
commit527551287011888c2ba13fe92e636300ce625430 (patch)
tree47f7743d5d3a70edc60e03cb135e016f3155681f /tests
parent9608f4003dedd8dfe99327c15668ca1a43ebd93b (diff)
downloadguix-527551287011888c2ba13fe92e636300ce625430.tar
guix-527551287011888c2ba13fe92e636300ce625430.tar.gz
tests: Check the effect of '--without-tests' on implicit inputs.
* tests/transformations.scm ("options->transformation, without-tests"): Ensure TAR has #:tests? #f.
Diffstat (limited to 'tests')
-rw-r--r--tests/transformations.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/transformations.scm b/tests/transformations.scm
index 07ed8b1234..2d33bed7ae 100644
--- a/tests/transformations.scm
+++ b/tests/transformations.scm
@@ -368,10 +368,9 @@
(let ((new (t p)))
(match (bag-direct-inputs (package->bag new))
((("dep" dep) ("tar" tar) _ ...)
- ;; TODO: Check whether TAR has #:tests? #f when transformations
- ;; apply to implicit inputs.
- (equal? (package-arguments dep)
- '(#:tests? #f)))))))
+ (and (equal? (package-arguments dep) '(#:tests? #f))
+ (match (memq #:tests? (package-arguments tar))
+ ((#:tests? #f _ ...) #t))))))))
(test-end)