branch staging updated: gnu: e2fsprogs: Update to 1.46.4.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

apteryx pushed a commit to branch staging
in repository guix.

The following commit(s) were added to refs/heads/staging by this push:
     new 80ded5b  gnu: e2fsprogs: Update to 1.46.4.
80ded5b is described below

commit 80ded5b280df348cba18a7f56601a96f56578632
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Tue Oct 5 21:31:13 2021 -0400

    gnu: e2fsprogs: Update to 1.46.4.
    
    This resolves a test failure on armhf-linux (when building on a 
aarch64-linux
    system).
    
    * gnu/packages/linux.scm (e2fsprogs): Update to 1.46.4.  Remove trailing #t.
---
 gnu/packages/linux.scm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 5bb9bc9..43b6913 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -2176,7 +2176,7 @@ module.")
 (define-public e2fsprogs
   (package
     (name "e2fsprogs")
-    (version "1.46.2")
+    (version "1.46.4")
     (source (origin
              (method url-fetch)
              (uri (string-append
@@ -2185,7 +2185,7 @@ module.")
                    "e2fsprogs-" version ".tar.xz"))
              (sha256
               (base32
-               "0s216nn0lv7s278v933a44fv1ibi900c94743gpp2kn9jlr0kai3"))))
+               "04wp77fg842dhribgn0xvbd77idh0n7a839ga4bwy78v7i9l445i"))))
     (build-system gnu-build-system)
     (inputs `(("util-linux" ,util-linux "lib")))
     (native-inputs `(("pkg-config" ,pkg-config)
@@ -2227,8 +2227,7 @@ module.")
                 "INSTALL_SYMLINK = sh"))
              (substitute* (find-files "." "^Makefile.in$")
                (("#!/bin/sh")
-                (string-append "#!" (which "sh"))))
-             #t))
+                (string-append "#!" (which "sh"))))))
            (add-after 'install 'install-libs
              (lambda* (#:key outputs #:allow-other-keys)
                (let* ((out (assoc-ref outputs "out"))
@@ -2243,8 +2242,7 @@ module.")
                  (let ((archives (find-files lib "\\.a$")))
                    (for-each (lambda (file)
                                (chmod file #o666))
-                             archives))
-                 #t))))))
+                             archives))))))))
     (home-page "http://e2fsprogs.sourceforge.net/";)
     (synopsis "Creating and checking ext2/ext3/ext4 file systems")
     (description