01/02: gnu: zfs-auto-snapshot: Use git-fetch.

[guix-commits]

mothacehe pushed a commit to branch master
in repository guix.

commit 95bc788002882a4893ff9734f713b920899be062
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Thu May 13 16:04:17 2021 +0200

    gnu: zfs-auto-snapshot: Use git-fetch.
    
    Do not use an autogenerated tarball. This is notified by "guix lint".
    
    * gnu/packages/file-systems.scm (zfs-auto-snapshot)[source]: Use git-fetch
    method.
---
 gnu/packages/file-systems.scm | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm
index e76f4b3..5d6f9b4 100644
--- a/gnu/packages/file-systems.scm
+++ b/gnu/packages/file-systems.scm
@@ -1147,13 +1147,16 @@ community.")
     (name "zfs-auto-snapshot")
     (version "1.2.4")
     (source
-      (origin
-        (method url-fetch)
-        (uri (string-append
-               
"https://github.com/zfsonlinux/zfs-auto-snapshot/archive/upstream/";
-               version ".tar.gz"))
-        (sha256
-          (base32 "16ry1w43i44xc67gr73x6fa48ninfhqxr498ad4m3kya93vp2zrh"))))
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url
+              (string-append "https://github.com/zfsonlinux/"; name))
+             (commit
+              (string-append "upstream/" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0m4xw7h5qlbn5zdf9wb137pcr5l7hyrr7w2dgr16dfm5ay64vvfq"))))
     (build-system gnu-build-system)
     (inputs
       ;; Note: if you are inheriting from the above zfs package in order