From: Maxime Devos <maximedevos@telenet.be>
Date: Thu, 8 Jul 2021 15:12:46 +0000 (+0200)
Subject: gnu: python-hyperframe: Respect "--without-tests".
X-Git-Url: http://git.hcoop.net/jackhill/guix/guix.git/commitdiff_plain/a5a90a98d8664c92bb8d744abfde6c68c342d364

gnu: python-hyperframe: Respect "--without-tests".

* gnu/packages/python-web.scm
  (python-hyperframe)[arguments]<#:phases>{check}: Respect #:tests?.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
---

diff --git a/gnu/packages/python-web.scm b/gnu/packages/python-web.scm
index 656f310dc1..cdc5c13b09 100644
--- a/gnu/packages/python-web.scm
+++ b/gnu/packages/python-web.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
 ;;; Copyright © 2021 Ekaitz Zarraga <ekaitz@elenq.tech>
 ;;; Copyright © 2021 Greg Hogan <code@greghogan.com>
+;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -843,9 +844,10 @@ follow links and submit forms.  It doesn’t do JavaScript.")
      `(#:phases
        (modify-phases %standard-phases
          (replace 'check
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (add-installed-pythonpath inputs outputs)
-             (invoke "pytest" "-vv" "test"))))))
+           (lambda* (#:key tests? inputs outputs #:allow-other-keys)
+             (when tests?
+               (add-installed-pythonpath inputs outputs)
+               (invoke "pytest" "-vv" "test")))))))
     (native-inputs
      `(("python-pytest" ,python-pytest)))
     (home-page "https://github.com/python-hyper/hyperframe")