03/08: gnu: hypercorn: Honor #:tests? in 'check' phase.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit a6dc9f783f9da7beb0d93a761149b36d263ed6ce
Author: Vinicius Monego <monego@posteo.net>
AuthorDate: Sat Oct 30 17:30:48 2021 +0000

    gnu: hypercorn: Honor #:tests? in 'check' phase.
    
    * gnu/packages/python-web.scm (hypercorn)[arguments]: Honor #:tests? in
    'check' phase.
    
    Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
---
 gnu/packages/python-web.scm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/python-web.scm b/gnu/packages/python-web.scm
index 70f740b..6082763 100644
--- a/gnu/packages/python-web.scm
+++ b/gnu/packages/python-web.scm
@@ -1650,9 +1650,10 @@ RFC6455, regardless of your programming paradigm.")
      `(#:phases
        (modify-phases %standard-phases
          (replace 'check
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (add-installed-pythonpath inputs outputs)
-             (invoke "pytest" "-vv"))))))
+           (lambda* (#:key inputs outputs tests? #:allow-other-keys)
+             (when tests?
+               (add-installed-pythonpath inputs outputs)
+               (invoke "python" "-m" "pytest")))))))
     ;; Propagate because Hypercorn also exposes functionality over a module.
     (propagated-inputs
      `(("python-h11" ,python-h11)