07/08: gnu: java-lz4: Don't use unstable tarball.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit 6632fc2897287141d8982e7a3a03091fa20289de
Author: Efraim Flashner <address@hidden>
AuthorDate: Sun Apr 19 22:20:54 2020 +0300

    gnu: java-lz4: Don't use unstable tarball.
    
    * gnu/packages/java.scm (java-lz4)[source]: Download using git-fetch.
    [arguments]: Add phase to make files writable.
---
 gnu/packages/java.scm | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm
index 1ad188b..7ad72f4 100644
--- a/gnu/packages/java.scm
+++ b/gnu/packages/java.scm
@@ -9445,13 +9445,14 @@ by technical operatives or consultants working with 
enterprise platforms.")
     (name "java-lz4")
     (version "1.4.0")
     (source (origin
-              (method url-fetch)
-              (uri (string-append "https://github.com/lz4/lz4-java/archive/";
-                                  version ".tar.gz"))
-              (file-name (string-append name "-" version ".tar.gz"))
+              (method git-fetch)
+              (uri (git-reference
+                     (url "https://github.com/lz4/lz4-java";)
+                     (commit version)))
+              (file-name (git-file-name name version))
               (sha256
                (base32
-                "096dm57p2lzqk28n0j2p52x2j3cvnsd2dfqn43n7vbwrkjsy7y54"))))
+                "0ydjakhv3cz34mfvv14qrh2ksdxifgjwwagjy7r46qr3f68hnf6y"))))
     (build-system ant-build-system)
     (arguments
      `(#:jar-name "lz4.jar"
@@ -9460,6 +9461,10 @@ by technical operatives or consultants working with 
enterprise platforms.")
        #:tests? #f; FIXME: requires more dependencies
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'make-files-writable
+           (lambda _
+             (for-each make-file-writable (find-files "."))
+             #t))
          (add-before 'configure 'generate-source
            (lambda _
              (with-directory-excursion "src/build/source_templates"