137/290: gnu: ghc-zip-archive: Update to 0.4.1.

[guix-commits]

samplet pushed a commit to branch wip-haskell-updates
in repository guix.

commit ddf08629ade63fa59306b99c6559f82167689e08
Author: Timothy Sample <address@hidden>
Date:   Thu Oct 31 14:32:59 2019 -0400

    gnu: ghc-zip-archive: Update to 0.4.1.
    
    * gnu/packages/haskell-xyz.scm (ghc-zip-archive): Update to 0.4.1.
    [arguments]: Add a phase that sets up the environment for the tests.
    [native-inputs]: Add 'which'.
---
 gnu/packages/haskell-xyz.scm | 17 ++++++++++++++---
 1 file changed, 14 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/haskell-xyz.scm b/gnu/packages/haskell-xyz.scm
index ed2414c..59d1bd7 100644
--- a/gnu/packages/haskell-xyz.scm
+++ b/gnu/packages/haskell-xyz.scm
@@ -11866,7 +11866,7 @@ documents.")
 (define-public ghc-zip-archive
   (package
     (name "ghc-zip-archive")
-    (version "0.3.3")
+    (version "0.4.1")
     (source
      (origin
        (method url-fetch)
@@ -11876,15 +11876,26 @@ documents.")
              ".tar.gz"))
        (sha256
         (base32
-         "0kf8xyac168bng8a0za2jwrbss7a4ralvci9g54hnvl0gkkxx2lq"))))
+         "1cdix5mnxrbs7b2kivhdydhfzgxidd9dqlw71mdw5p21cabwkmf5"))))
     (build-system haskell-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-before 'check 'set-PATH-for-tests
+           (lambda* (#:key inputs #:allow-other-keys)
+             (let ((unzip (assoc-ref inputs "unzip"))
+                   (which (assoc-ref inputs "which"))
+                   (path (getenv "PATH")))
+               (setenv "PATH" (string-append unzip "/bin:" which "/bin:" path))
+               #t))))))
     (inputs
      `(("ghc-digest" ,ghc-digest)
        ("ghc-temporary" ,ghc-temporary)
        ("ghc-zlib" ,ghc-zlib)))
     (native-inputs
      `(("ghc-hunit" ,ghc-hunit)
-       ("unzip" ,unzip)))
+       ("unzip" ,unzip)
+       ("which" ,which)))
     (home-page "https://hackage.haskell.org/package/zip-archive";)
     (synopsis "Zip archive library for Haskell")
     (description "The zip-archive library provides functions for creating,