08/12: gnu: phockup: Test exiftool patching.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 0d036019318ccef0ce56270b60ef5074ed9d0400
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Jan 22 01:00:19 2023 +0100

    gnu: phockup: Test exiftool patching.
    
    * gnu/packages/image.scm (phockup)[arguments]: Unset PATH during tests.
---
 gnu/packages/image.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index 0b57d88468..87a9b791bc 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -2434,7 +2434,12 @@ Wacom-style graphics tablets.")
                 (string-append "'" (search-input-file inputs 
"bin/exiftool"))))))
          (add-before 'install 'check
            (lambda _
-             (invoke "pytest")))
+             ;; 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")))