From 4cc7302e7dcd1de8d5ca7e9b82da2f8b9fa98911 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Sat, 10 Feb 2024 10:33:18 +0000
Subject: build-system: perl: Accept Gexps for #:module-build-flags.

Matching the change in 2d40e6f7ab04ec367a9a7fc1af3daa507fb60d3c otherwise the
cross build derivations are broken, as was the case for emacs-pde.

* guix/build-system/perl.scm (perl-cross-build) [module-build-flags]: Accept
gexps.

Change-Id: I2dc85bc50bc077581e3abfc5baaedc6487118192
---
 guix/build-system/perl.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'guix')

diff --git a/guix/build-system/perl.scm b/guix/build-system/perl.scm
index 0d5493ab90..3f7a2dea27 100644
--- a/guix/build-system/perl.scm
+++ b/guix/build-system/perl.scm
@@ -197,7 +197,9 @@ XS or similar."
                                native-search-paths))
                       #:make-maker? #$make-maker?
                       #:make-maker-flags #$make-maker-flags
-                      #:module-build-flags #$(sexp->gexp module-build-flags)
+                      #:module-build-flags #$(if (pair? module-build-flags)
+                                                 (sexp->gexp module-build-flags)
+                                                 module-build-flags)
                       #:phases #$phases
                       #:build #$build
                       #:system #$system
-- 
cgit v1.2.3