03/03: gnu: gpodder: Make the check phase honor the tests? argument.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit d68d84ee190dcc255732ecde6b37b925a9edd22c
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Tue Jul 20 21:38:34 2021 +0300

    gnu: gpodder: Make the check phase honor the tests? argument.
    
    * gnu/packages/gpodder.scm (gpodder)[arguments]: Adjust custom 'check
    phase to skip tests when #:tests? is #f.
---
 gnu/packages/gpodder.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/gpodder.scm b/gnu/packages/gpodder.scm
index 13a75d4..5a18a16 100644
--- a/gnu/packages/gpodder.scm
+++ b/gnu/packages/gpodder.scm
@@ -93,11 +93,12 @@
                  (("xdg-open") (string-append xdg-utils "/bin/xdg-open")))
                #t)))
          (replace 'check
-           (lambda _
+           (lambda* (#:key tests? #:allow-other-keys)
              ; The `unittest' target overrides the PYTHONPATH variable.
              (substitute* "makefile"
                (("PYTHONPATH=src/") "PYTHONPATH=${PYTHONPATH}:src/"))
-             (invoke "make" "unittest")))
+             (when tests?
+               (invoke "make" "unittest"))))
          ;; 'msgmerge' introduces non-determinism by resetting the
          ;; POT-Creation-Date in .po files.
          (add-before 'install 'do-not-run-msgmerge