mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-02-07 19:39:34 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: python-typer: Run more tests.

Browse source 
* gnu/packages/python-xyz.scm (python-typer)[arguments]: Delete phase
'disable-failing-tests; disable only test_show_completion and
test_install_completion in 'check phase; add phase 'patch-shell-reference.
This commit is contained in:
Ricardo Wurmus 2021-11-18 16:58:44 +00:00
parent 28b92acf6b
commit 9e76a5b7cb
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 17 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

34
gnu/packages/python-xyz.scm
View file

@ -20855,30 +20855,30 @@ based on the CPython 2.7 and 3.7 parsers.")
(arguments
`(#:phases
(modify-phases %standard-phases
(add-before 'check 'disable-failing-tests
;; Unfortunately, this doesn't seem to be enough to fix these two
;; tests, but we'll patch this anyway.
(add-after 'unpack 'patch-shell-reference
(lambda _
(substitute* "tests/test_completion/test_completion.py"
(("def test_show_completion")
"def _test_show_completion")
(("def test_install_completion")
"def _test_install_completion"))
(substitute* "tests/test_completion/test_completion_install.py"
(("def test_completion_install_bash")
"def _test_completion_install_bash")
(("def test_completion_install_zsh")
"def _test_completion_install_zsh")
(("def test_completion_install_fish")
"def _test_completion_install_fish")
(("def test_completion_install_powershell")
"def _test_completion_install_powershell"))
#t))
(("\"bash\"") (string-append "\"" (which "bash") "\""))
(("\"/bin/bash\"") (string-append "\"" (which "bash") "\"")))))
(replace 'check
(lambda _
(setenv "HOME" "/tmp") ; some tests need it
;; This is for completion tests
(with-output-to-file "/tmp/.bashrc" (lambda _ (display "# dummy")))
(setenv "PYTHONPATH"
(string-append (getcwd) ":"
(getenv "PYTHONPATH")))
(invoke "python" "-m" "pytest" "tests/")
#t)))))
(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