02/12: tests: Check the effect of '--without-tests' on implicit inputs.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 527551287011888c2ba13fe92e636300ce625430
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Dec 21 12:06:11 2020 +0100

    tests: Check the effect of '--without-tests' on implicit inputs.
    
    * tests/transformations.scm ("options->transformation, without-tests"):
    Ensure TAR has #:tests? #f.
---
 tests/transformations.scm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/tests/transformations.scm b/tests/transformations.scm
index 07ed8b1..2d33bed 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)