02/05: gexp: 'gexp->script' marks its result as non-offloadable and non-substitutable.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 52207b3938d3ccbeb661ba8d0af563cf1e0e3333
Author: Ludovic Courtès <address@hidden>
Date:   Fri Jan 3 12:39:48 2020 +0100

    gexp: 'gexp->script' marks its result as non-offloadable and 
non-substitutable.
    
    * guix/gexp.scm (gexp->script): Pass #:local-build? and #:substitutable?
    to 'gexp->derivation'.
---
 guix/gexp.scm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/guix/gexp.scm b/guix/gexp.scm
index 1233105..912960f 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès 
<address@hidden>
+;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès 
<address@hidden>
 ;;; Copyright © 2018 Clément Lassieur <address@hidden>
 ;;; Copyright © 2018 Jan Nieuwenhuizen <address@hidden>
 ;;; Copyright © 2019 Mathieu Othacehe <address@hidden>
@@ -1602,7 +1602,12 @@ imported modules in its search path.  Look up EXP's 
modules in MODULE-PATH."
                            (chmod port #o555))))
                       #:system system
                       #:target target
-                      #:module-path module-path)))
+                      #:module-path module-path
+
+                      ;; These derivations are not worth offloading or
+                      ;; substituting.
+                      #:local-build? #t
+                      #:substitutable? #f)))
 
 (define* (gexp->file name exp #:key
                      (set-load-path? #t)