From 9d0c5f18e7c763ee8815f49865d057c2a65ff313 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Thu, 18 Nov 2021 17:00:48 +0000 Subject: gnu: python-typer: Run tests conditionally. * gnu/packages/python-xyz.scm (python-typer)[arguments]: Only run tests when TESTS? is #true. --- gnu/packages/python-xyz.scm | 29 +++++++++++++++-------------- 1 file changed, 15 insertions(+), 14 deletions(-) (limited to 'gnu') diff --git a/gnu/packages/python-xyz.scm b/gnu/packages/python-xyz.scm index 3115d367b2..1f086edc0f 100644 --- a/gnu/packages/python-xyz.scm +++ b/gnu/packages/python-xyz.scm @@ -20863,22 +20863,23 @@ based on the CPython 2.7 and 3.7 parsers.") (("\"bash\"") (string-append "\"" (which "bash") "\"")) (("\"/bin/bash\"") (string-append "\"" (which "bash") "\""))))) (replace 'check - (lambda _ - (setenv "HOME" "/tmp") ; some tests need it + (lambda* (#:key tests? #:allow-other-keys) + (when tests? + (setenv "HOME" "/tmp") ; some tests need it - ;; This is for completion tests - (with-output-to-file "/tmp/.bashrc" (lambda _ (display "# dummy"))) + ;; This is for completion tests + (with-output-to-file "/tmp/.bashrc" (lambda _ (display "# dummy"))) - (setenv "GUIX_PYTHONPATH" - (string-append (getcwd) ":" - (getenv "GUIX_PYTHONPATH"))) - (let ((disabled-tests (list "test_show_completion" - "test_install_completion"))) - (invoke "python" "-m" "pytest" "tests/" - "-k" - (string-append "not " - (string-join disabled-tests - " and not "))))))))) + (setenv "GUIX_PYTHONPATH" + (string-append (getcwd) ":" + (getenv "GUIX_PYTHONPATH"))) + (let ((disabled-tests (list "test_show_completion" + "test_install_completion"))) + (invoke "python" "-m" "pytest" "tests/" + "-k" + (string-append "not " + (string-join disabled-tests + " and not ")))))))))) (propagated-inputs `(("python-click" ,python-click))) (native-inputs -- cgit 1.4.1