guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 16aaabdf53c74aff0f4d3a297effca450f0abac4
Author: Arun Isaac <[email protected]>
AuthorDate: Mon Sep 29 13:40:04 2025 +0100
gnu: phockup: Respect tests?.
* gnu/packages/image.scm (phockup)[arguments]: Respect tests? in the check
phase.
---
gnu/packages/image.scm | 15 ++++++++-------
1 file changed, 8 insertions(+), 7 deletions(-)
diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index 192544e8da..e34ffca44a 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -2964,13 +2964,14 @@ Wacom-style graphics tablets.")
(("'exiftool")
(string-append "'" (search-input-file inputs
"bin/exiftool"))))))
(add-before 'install 'check
- (lambda _
- ;; Test without PATH to make sure ‘exiftool’ is properly found.
- (let ((path (getenv "PATH"))
- (pytest (which "pytest")))
- (setenv "PATH" "")
- (invoke pytest)
- (setenv "PATH" path))))
+ (lambda* (#:key tests? #:allow-other-keys)
+ (when tests?
+ ;; Test without PATH to make sure ‘exiftool’ is properly found.
+ (let ((path (getenv "PATH"))
+ (pytest (which "pytest")))
+ (setenv "PATH" "")
+ (invoke pytest)
+ (setenv "PATH" path)))))
(add-after 'install 'install-bin
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
