From c83d7d68f324e5c70c0b7ec8de4fff2deee792ca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 3 Aug 2021 15:54:26 +0200
Subject: [PATCH] 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 89bde8396c..857a71ce15 100644
--- a/gnu/packages/machine-learning.scm
+++ b/gnu/packages/machine-learning.scm
@@ -2462,9 +2462,9 @@ (define-public gloo
          #: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