01/01: gexp: Use cross extensions when cross-compiling.

[guix-commits]

mothacehe pushed a commit to branch master
in repository guix.

commit 396b05f04ed5c5ad6141bd1b4f70f51561a97aad
Author: Mathieu Othacehe <address@hidden>
Date:   Sun Aug 18 11:00:23 2019 +0200

    gexp: Use cross extensions when cross-compiling.
    
    * guix/gexp.scm (load-path-expression): Use ungexp-splicing instead of
    ungexp-native-splicing so that the cross extensions are used when target is
    set.
---
 guix/gexp.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/gexp.scm b/guix/gexp.scm
index 600750e..7323277 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -1508,7 +1508,7 @@ are searched for in PATH.  Return #f when MODULES and 
EXTENSIONS are empty."
          (gexp (eval-when (expand load eval)
                  ;; Augment the load paths and delete duplicates.  Do that
                  ;; without loading (srfi srfi-1) or anything.
-                 (let ((extensions '((ungexp-native-splicing extensions)))
+                 (let ((extensions '((ungexp-splicing extensions)))
                        (prepend (lambda (items lst)
                                   ;; This is O(N²) but N is typically small.
                                   (let loop ((items items)