diff options
| author | Maxime Devos <maximedevos@telenet.be> | 2021-05-24 22:36:06 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2021-05-28 11:36:03 +0200 |
| commit | 416f7843c48496fa3cbca2c2fffb9f661751cbe0 (patch) | |
| tree | a0de2d4725a197e39e218c41ee500763c45c9bbb | |
| parent | 0ab7796f4d8989619c8091a5e3c36507161b6743 (diff) | |
| download | 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>
| -rw-r--r-- | gnu/packages/tryton.scm | 7 |
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 |