03/05: build-system/texlive: Be explicit about #:guile-for-build.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 5996aab354831d942b10253bc70217a4f2e6a247
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Feb 11 17:24:39 2022 +0100

    build-system/texlive: Be explicit about #:guile-for-build.
    
    This ensures package derivations are not a function of the value
    of (%guile-for-build).
    
    * guix/build-system/texlive.scm (texlive-build): Explicitly pass
     #:guile-for-build to 'gexp->derivation'.
---
 guix/build-system/texlive.scm | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/guix/build-system/texlive.scm b/guix/build-system/texlive.scm
index 09907c67d8..dbb72cd24a 100644
--- a/guix/build-system/texlive.scm
+++ b/guix/build-system/texlive.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
-;;; Copyright © 2021 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2021-2022 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2021 Thiago Jung Bauermann <bauermann@kolabnow.com>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -177,10 +177,13 @@ level package ID."
                                                   (map 
search-path-specification->sexp
                                                        search-paths)))))))
 
-  (gexp->derivation name builder
-                    #:system system
-                    #:target #f
-                    #:substitutable? substitutable?))
+  (mlet %store-monad ((guile (package->derivation (or guile (default-guile))
+                                                  system #:graft? #f)))
+    (gexp->derivation name builder
+                      #:system system
+                      #:target #f
+                      #:substitutable? substitutable?
+                      #:guile-for-build guile)))
 
 (define texlive-build-system
   (build-system