guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

09/14: gnu: java-kxml2: Don't use unstable tarball.


From: guix-commits
Subject: 09/14: gnu: java-kxml2: Don't use unstable tarball.
Date: Sun, 10 Feb 2019 11:48:57 -0500 (EST)

nckx pushed a commit to branch master
in repository guix.

commit 00fc938983f70f9ff9522133380a48495a5a4114
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Sun Feb 10 02:37:28 2019 +0100

    gnu: java-kxml2: Don't use unstable tarball.
    
    * gnu/packages/xml.scm (java-kxml2)[source]: Use GIT-FETCH and
    GIT-FILE-NAME.
    [arguments]: Add 'make-git-checkout-writable' phase.
---
 gnu/packages/xml.scm | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/xml.scm b/gnu/packages/xml.scm
index 80dd6fb..f216482 100644
--- a/gnu/packages/xml.scm
+++ b/gnu/packages/xml.scm
@@ -1856,13 +1856,14 @@ low memory footprint.")
     (name "java-kxml2")
     (version "2.4.2")
     (source (origin
-              (method url-fetch)
-              (uri (string-append 
"https://github.com/stefanhaustein/kxml2/archive/v";
-                                  version ".tar.gz"))
-              (file-name (string-append name "-" version ".tar.gz"))
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/stefanhaustein/kxml2.git";)
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
               (sha256
                (base32
-                "17kh04qf3vll1xx6sv06xlazw2hxa8qdmzyday9r6z2191jlj74w"))))
+                "0g6d8c9r9sh3x04sf4wdpgwvhkqvk11k3kq9skx91i60h4vn01hg"))))
     (build-system ant-build-system)
     (arguments
      `(#:jar-name "kxml2.jar"
@@ -1873,6 +1874,10 @@ low memory footprint.")
        #:tests? #f
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'make-git-checkout-writable
+           (lambda _
+             (for-each make-file-writable (find-files "."))
+             #t))
          (add-before 'build 'copy-resources
            (lambda _
              (copy-recursively "src/main/resources" "build/classes")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]