[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/05: gnu: static-bash-for-glibc: Use gexps.
From: |
guix-commits |
Subject: |
01/05: gnu: static-bash-for-glibc: Use gexps. |
Date: |
Tue, 28 Feb 2023 11:11:24 -0500 (EST) |
civodul pushed a commit to branch core-updates
in repository guix.
commit 61efecd33934ce6fd800c9a279691700d1f784ed
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Tue Feb 28 17:05:33 2023 +0100
gnu: static-bash-for-glibc: Use gexps.
* gnu/packages/commencement.scm (static-bash-for-glibc)[arguments]: Use
gexps.
---
gnu/packages/commencement.scm | 14 +++++++-------
1 file changed, 7 insertions(+), 7 deletions(-)
diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index e48878248d..a11fa37d60 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2012-2022 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2012-2023 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2014, 2015, 2017 Mark H Weaver <mhw@netris.org>
@@ -2945,14 +2945,14 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker
-Wl,~a/~a \"$@\"~%"
#:guile ,%bootstrap-guile
,@(substitute-keyword-arguments (package-arguments static-bash)
- ((#:configure-flags flags '())
+ ((#:configure-flags flags #~'())
;; Add a '-L' flag so that the pseudo-cross-ld of
;; BINUTILS-BOOT0 can find libc.a.
- `(append ,flags
- (list (string-append "LDFLAGS=-static -L"
- (assoc-ref %build-inputs
- "libc:static")
- "/lib")))))))))
+ #~(append #$flags
+ (list (string-append "LDFLAGS=-static -L"
+ (assoc-ref %build-inputs
+ "libc:static")
+ "/lib")))))))))
(define gettext-boot0
;; A minimal gettext used during bootstrap.