From f9f2198d82f6aa7147700bed3f9d42a93201d620 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Thu, 11 Jan 2024 15:48:47 +0100
Subject: gnu: cross-base: ‘cross’ helper uses gexps.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

This is required in cases where P uses gexps.

* gnu/packages/cross-base.scm (cross): Use gexps.

Change-Id: Ie038cbec67a53700f31791ee2d171918788111d2
---
 gnu/packages/cross-base.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/cross-base.scm b/gnu/packages/cross-base.scm
index 090725f473..8d4c6605f1 100644
--- a/gnu/packages/cross-base.scm
+++ b/gnu/packages/cross-base.scm
@@ -80,9 +80,9 @@
     (name (string-append (package-name p) "-cross-" target))
     (arguments
      (substitute-keyword-arguments (package-arguments p)
-       ((#:configure-flags flags ''())
-        `(cons ,(string-append "--target=" target)
-               ,flags))))))
+       ((#:configure-flags flags #~'())
+        #~(cons #$(string-append "--target=" target)
+                #$flags))))))
 
 (define (contains-keyword? args)
   "Check if ARGS contains a keyword object."
-- 
cgit 1.4.1