From bd8e7621b880c529cc69102bd6817d79257526ee Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Thu, 20 May 2021 16:26:46 +0200 Subject: [PATCH] guix: Build texlive-configuration only when texlive-base is present. Fixes . * guix/profiles.scm (texlive-configuration): Build only if texlive-base is present in the profile's manifest. --- guix/profiles.scm | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/guix/profiles.scm b/guix/profiles.scm index 0044851dc2..ca997a7125 100644 --- a/guix/profiles.scm +++ b/guix/profiles.scm @@ -1745,16 +1745,15 @@ MANIFEST." maproot "updmap/pdftex/"))))) #t))) - (with-monad %store-monad - (if (any (cut string-prefix? "texlive-" <>) - (map manifest-entry-name (manifest-entries manifest))) - (gexp->derivation "texlive-configuration" build - #:substitutable? #f - #:local-build? #t - #:properties - `((type . profile-hook) - (hook . texlive-configuration))) - (return #f)))) + (mlet %store-monad ((texlive-base (manifest-lookup-package manifest "texlive-base"))) + (if texlive-base + (gexp->derivation "texlive-configuration" build + #:substitutable? #f + #:local-build? #t + #:properties + `((type . profile-hook) + (hook . texlive-configuration))) + (return #f)))) (define %default-profile-hooks ;; This is the list of derivation-returning procedures that are called by