01/26: gnu: bctoolbox: Run tests conditionally.

[guix-commits]

rekado pushed a commit to branch core-updates
in repository guix.

commit 3101fe4b8e666f88caa1c127efc5adcefc26741a
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Thu Apr 6 19:38:47 2023 +0200

    gnu: bctoolbox: Run tests conditionally.
    
    * gnu/packages/linphone.scm (bctoolbox)[arguments]: Respect the TESTS? flag 
in
    the custom 'check phase.
---
 gnu/packages/linphone.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/linphone.scm b/gnu/packages/linphone.scm
index 84bc16805c..9b9c5fcd4b 100644
--- a/gnu/packages/linphone.scm
+++ b/gnu/packages/linphone.scm
@@ -3,6 +3,7 @@
 ;;; Copyright © 2020, 2021 Raghav Gururajan <raghavgururajan@disroot.org>
 ;;; Copyright © 2020, 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
+;;; Copyright © 2023 Ricardo Wurmus <rekado@elephly.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -176,9 +177,10 @@ writing, administering, and running unit tests in C.")
                (("if \\(file_exists\\(\"..\"\\)\\)")
                 "if (NULL)"))))
          (replace 'check
-           (lambda _
-             (with-directory-excursion "tester"
-               (invoke "./bctoolbox_tester")))))))
+           (lambda* (#:key tests? #:allow-other-keys)
+             (when tests?
+               (with-directory-excursion "tester"
+                 (invoke "./bctoolbox_tester"))))))))
     (inputs
      `(("bcunit" ,bcunit)
        ("decaf" ,libdecaf)