gnu: guile-mastodon: Update to 0.0.1-1.74b75bc.

* gnu/packages/guile-xyz.scm (guile-mastodon): Update to 0.0.1-1.74b75bc.
[source]: Remove Guile-3.0 snippet since this new release brings Guile-3.0
support.

gnu/packages/guile-xyz.scm

@@ -1313,44 +1313,37 @@ (define-public guile3.0-newt
   (deprecated-package "guile3.0-newt" guile-newt))
 
 (define-public guile-mastodon
-  (package
+  (let ((commit "74b75bcf547df92acee1e0466ecd7ec07f775392")
-    (name "guile-mastodon")
+        (revision "1"))
-    (version "0.0.1")
+    (package
-    (source (origin
+      (name "guile-mastodon")
-              (method git-fetch)
+      (version (git-version "0.0.1" revision commit))
-              (uri (git-reference
+      (source (origin
-                    (url "https://framagit.org/prouby/guile-mastodon.git")
+                (method git-fetch)
-                    (commit (string-append "v" version))))
+                (uri (git-reference
-              (file-name (git-file-name name version))
+                      (url "https://framagit.org/prouby/guile-mastodon.git")
-              (sha256
+                      (commit commit)))
-               (base32
+                (file-name (string-append name "-" version "-checkout"))
-                "1vblf3d1bbwna3l09p2ap5y8ycvl549bz6whgk78imyfmn28ygry"))
+                (sha256
-              (modules '((guix build utils)))
+                 (base32
-              (snippet
+                  "1wx5h6wa9c0na8mrnr2nv1nzjvq68zyrly8yyp11dsskhaw4y33h"))))
-               '(begin
+      (build-system gnu-build-system)
-                  ;; Allow builds with Guile 3.0.
+      (native-inputs
-                  (substitute* "configure.ac"
+       `(("autoconf" ,autoconf)
-                    (("^PKG_CHECK.*") "")
+         ("automake" ,automake)
-                    (("^GUILE_PKG.*")
+         ("emacs" ,emacs-minimal)
-                     "GUILE_PKG([3.0 2.2])\n"))
+         ("pkg-config" ,pkg-config)
-                  #t))))
+         ("texinfo" ,texinfo)))
-    (build-system gnu-build-system)
+      (inputs
-    (native-inputs
+       `(("guile" ,guile-3.0)
-     `(("autoconf" ,autoconf)
+         ("gnutls" ,gnutls)
-       ("automake" ,automake)
+         ("guile-json" ,guile-json-4)))
-       ("emacs" ,emacs-minimal)
+      (home-page "https://framagit.org/prouby/guile-mastodon")
-       ("pkg-config" ,pkg-config)
+      (synopsis "Guile Mastodon REST API module")
-       ("texinfo" ,texinfo)))
+      (description "This package provides Guile modules to access the
-    (inputs
-     `(("guile" ,guile-3.0)
-       ("gnutls" ,gnutls)
-       ("guile-json" ,guile-json-4)))
-    (home-page "https://framagit.org/prouby/guile-mastodon")
-    (synopsis "Guile Mastodon REST API module")
-    (description "This package provides Guile modules to access the
 @uref{https://docs.joinmastodon.org/api/, REST API of Mastodon}, a federated
 microblogging service.")
-    (license license:gpl3+)))
+      (license license:gpl3+))))
 
 (define-public guile-parted
   (package