branch master updated: gnu: btrfs-progs: Fix build.

[guix-commits]

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

ngz pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new dd15d0ffec gnu: btrfs-progs: Fix build.
dd15d0ffec is described below

commit dd15d0ffecb988ecaee37379f5e85d9bdfe2fe89
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Wed May 31 15:53:47 2023 +0200

    gnu: btrfs-progs: Fix build.
    
    * gnu/packages/linux.scm (btrfs-progs)[arguments]<#:configure-flags>: Fix
    typo.  Splicing MEMBER return value results in an invalid IF form.  The 
whole
    IF should be spliced instead.
    
    Reported-by: mrvdb on #guix.
---
 gnu/packages/linux.scm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index cef0c4d72f..28988e0101 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -5926,18 +5926,18 @@ and copy/paste text in the console and in xterm.")
     (arguments
      (list
       #:configure-flags
-      #~(append
+      #~(list
          ;; Without --disable-documentation, it complains about missing
          ;; python-sphinx on systems where this package isn't available
          ;; (because it requires Rust).
-         (if #$@(member (%current-system)
+         #$@(if (member (%current-system)
                         (package-transitive-supported-systems
                          python-sphinx))
-             '()
-             (list "--disable-documentation"))
+                '()
+                '("--disable-documentation"))
          ;; The ‘Python support’ was never actually installed by previous
          ;; versions of this package, but did prevent cross-compilation.
-         (list "--disable-python"))
+         "--disable-python")
       #:phases #~(modify-phases %standard-phases
                    (add-after 'unpack 'patch-makefile
                      (lambda* (#:key outputs #:allow-other-keys)