aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/tryton.scm
diff options
context:
space:
mode:
authorMaxime Devos <maximedevos@telenet.be>2021-05-24 22:36:06 +0200
committerLudovic Courtès <ludo@gnu.org>2021-05-28 11:36:03 +0200
commit416f7843c48496fa3cbca2c2fffb9f661751cbe0 (patch)
treea0de2d4725a197e39e218c41ee500763c45c9bbb /gnu/packages/tryton.scm
parent0ab7796f4d8989619c8091a5e3c36507161b6743 (diff)
downloadguix-416f7843c48496fa3cbca2c2fffb9f661751cbe0.tar
guix-416f7843c48496fa3cbca2c2fffb9f661751cbe0.tar.gz
gnu: tryton: Allow disabling the test suite.
* gnu/packages/tryton.scm (tryton-phases): Respect 'tests?' in the 'check' phase. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu/packages/tryton.scm')
-rw-r--r--gnu/packages/tryton.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/gnu/packages/tryton.scm b/gnu/packages/tryton.scm
index 107d5b4a7c..5fbbeb53be 100644
--- a/gnu/packages/tryton.scm
+++ b/gnu/packages/tryton.scm
@@ -150,15 +150,16 @@ and security.")
If present, pass EXTRA-ARGUMENTS to runtest as well."
`(modify-phases %standard-phases
(replace 'check
- (lambda* (#:key inputs outputs #:allow-other-keys)
+ (lambda* (#:key inputs outputs tests? #:allow-other-keys)
(let ((runtest
(string-append
(assoc-ref inputs "trytond")
"/lib/python"
,(version-major+minor (package-version python))
"/site-packages/trytond/tests/run-tests.py")))
- (add-installed-pythonpath inputs outputs)
- (invoke "python" runtest "-m" ,module ,@extra-arguments))))))
+ (when tests?
+ (add-installed-pythonpath inputs outputs)
+ (invoke "python" runtest "-m" ,module ,@extra-arguments)))))))
(define (tryton-arguments module . extra-arguments)
"Like ’tryton-phases’, but directly return all arguments for