01/04: build-system: perl: Accept Gexps for #:module-build-flags.

[guix-commits]

cbaines pushed a commit to branch master
in repository guix.

commit 4cc7302e7dcd1de8d5ca7e9b82da2f8b9fa98911
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Feb 10 10:33:18 2024 +0000

    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(-)

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