04/09: gnu: gloo: Honor #:tests? in 'check' phase.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit c83d7d68f324e5c70c0b7ec8de4fff2deee792ca
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Tue Aug 3 15:54:26 2021 +0200

    gnu: gloo: Honor #:tests? in 'check' phase.
    
    * gnu/packages/machine-learning.scm (gloo)[arguments]: In 'check' phase,
    honor #:tests?.
---
 gnu/packages/machine-learning.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/machine-learning.scm 
b/gnu/packages/machine-learning.scm
index 89bde83..857a71c 100644
--- a/gnu/packages/machine-learning.scm
+++ b/gnu/packages/machine-learning.scm
@@ -2462,9 +2462,9 @@ that:
          #:phases
          (modify-phases %standard-phases
            (replace 'check
-             (lambda _
-               (invoke "make" "gloo_test")
-               #t)))))
+             (lambda* (#:key tests? #:allow-other-keys)
+               (when tests?
+                 (invoke "make" "gloo_test")))))))
       (synopsis "Collective communications library")
       (description
        "Gloo is a collective communications library.  It comes with a