branch master updated: gnu: ableton-link: Run tests conditionally.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

ngz pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new d29cf19  gnu: ableton-link: Run tests conditionally.
d29cf19 is described below

commit d29cf19bfb16bfb4092cdd0231436e360fe2aa87
Author: Aleksandr Vityazev <avityazev@posteo.org>
AuthorDate: Fri Dec 17 08:30:24 2021 +0000

    gnu: ableton-link: Run tests conditionally.
    
    * gnu/packages/audio.scm (ableton-link)[arguments]: Respect TESTS? option.
    
    Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
---
 gnu/packages/audio.scm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index c984905..05c6354 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -5241,11 +5241,12 @@ Rate} 3600x2250 bit/s vocoder used in various radio 
systems.")
        #:phases
        (modify-phases %standard-phases
          (replace 'check
-           (lambda* (#:key inputs #:allow-other-keys)
-             (let* ((python (search-input-file inputs "/bin/python3"))
-                    (run-tests "../source/ci/run-tests.py"))
-               (invoke python run-tests "--target" "LinkCoreTest")
-               (invoke python run-tests "--target" "LinkDiscoveryTest"))))
+           (lambda* (#:key inputs tests? #:allow-other-keys)
+             (when tests?
+               (let* ((python (search-input-file inputs "/bin/python3"))
+                      (run-tests "../source/ci/run-tests.py"))
+                 (invoke python run-tests "--target" "LinkCoreTest")
+                 (invoke python run-tests "--target" "LinkDiscoveryTest")))))
          (add-before 'install 'patch-cmake
            (lambda* (#:key inputs #:allow-other-keys)
              (let* ((source "../source/"))