gnu: guile-avahi: Update to 0.4.1.

* gnu/packages/guile-xyz.scm (guile-avahi): Update to 0.4.1.
[arguments]: Remove.

gnu/packages/guile-xyz.scm

@@ -4693,48 +4693,19 @@ errors.")
     (license license:expat)))
 
 (define-public guile-avahi
-  (let ((commit "6d43caf64f672a9694bf6c98bbf7a734f17a51e8")
-        (revision "1"))
   (package
     (name "guile-avahi")
-      (version (git-version "0.4.0" revision commit))
+    (version "0.4.1")
     (source (origin
               (method git-fetch)
               (uri (git-reference
-                      (url "git://git.sv.gnu.org/guile-avahi.git")
+                    (url "https://git.sv.gnu.org/git/guile-avahi.git/")
-                      (commit commit)))
+                    (commit (string-append "v" version))))
               (file-name (git-file-name name version))
               (sha256
                (base32
-                  "0fvrf8x22yvc71180hd3xkhspg9yvadi0pbv8shzlsaxqncwy1m9"))
+                "0pxdi13kr4ylpms0xyf3xwwbhg025k7a2liwnbha1gw6ls58xgv2"))))
-                (modules '((guix build utils)))))
     (build-system gnu-build-system)
-      (arguments
-       `(#:modules (((guix build guile-build-system)
-                     #:select (target-guile-effective-version))
-                    ,@%gnu-build-system-modules)
-         #:imported-modules ((guix build guile-build-system)
-                             ,@%gnu-build-system-modules)
-         #:make-flags
-         '("GUILE_AUTO_COMPILE=0")    ;to prevent guild warnings
-         ;; Parallel builds fail on powerpc64le-linux.
-         ;; See https://lists.nongnu.org/archive/html/guile-avahi-bugs/2021-01/msg00000.html
-         #:parallel-build? #f
-         #:phases
-         (modify-phases %standard-phases
-           (add-before 'check 'fix-guile-avahi-file-name
-           (lambda* (#:key outputs #:allow-other-keys)
-             (with-directory-excursion "src"
-               (invoke "make" "install"
-                       "-j" (number->string
-                             (parallel-job-count))))
-             (let* ((out   (assoc-ref outputs "out"))
-                    (files (find-files "modules" ".scm")))
-               (substitute* files
-                 (("\"guile-avahi-v-0\"")
-                  (format #f "\"~a/lib/guile/~a/extensions/guile-avahi-v-0\""
-                          out (target-guile-effective-version))))
-               #t))))))
     (inputs
      (list guile-3.0 avahi))
     (native-inputs
@@ -4746,7 +4717,7 @@ use functionalities of the Avahi client library from Guile Scheme programs.
 Avahi itself is an implementation of multicast DNS (mDNS) and DNS Service
 Discovery (DNS-SD).")
     (home-page "https://www.nongnu.org/guile-avahi/")
-      (license license:lgpl3+))))
+    (license license:lgpl3+)))
 
 (define-public guile-dns
   (package