03/11: gnu: dosfstools: Fetch sources from git.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit b77a690d53f61fd2e878adfeb6c86d2479d22fcf
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Mon Feb 15 17:42:31 2021 +0100

    gnu: dosfstools: Fetch sources from git.
    
    * gnu/packages/disk.scm (dosfstools)[source]: Use GIT-FETCH and
    GIT-FILE-NAME.
    [native-inputs]: Add autoconf & automake.
---
 gnu/packages/disk.scm | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 110eb83..7ad57f1 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -379,19 +379,23 @@ to recover data more efficiently by only reading the 
necessary blocks.")
     (version "4.2")
     (source
      (origin
-       (method url-fetch)
-       (uri (string-append "https://github.com/dosfstools/dosfstools";
-                           "/releases/download/v" version "/"
-                           "dosfstools-" version ".tar.gz"))
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/dosfstools/dosfstools";)
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
        (sha256
-        (base32 "09xm1540h9npqw0s5s2335xqxfdp059rl98l3fidr4h0z7mnx4k4"))))
+        (base32 "1xygsixmmc9l7drxylggnzkqqiks8zmlsbhg3z723ii2ak94236s"))))
     (build-system gnu-build-system)
     (arguments
      `(#:configure-flags (list "--enable-compat-symlinks")
        #:make-flags (list (string-append "PREFIX=" %output)
                           "CC=gcc")))
     (native-inputs
-     `(("xxd" ,xxd))) ; for tests
+     `(("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ;; For tests.
+       ("xxd" ,xxd)))
     (home-page "https://github.com/dosfstools/dosfstools";)
     (synopsis "Utilities for making and checking MS-DOS FAT file systems")
     (description