diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2021-05-20 16:26:46 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2021-05-20 16:29:41 +0200 |
| commit | bd8e7621b880c529cc69102bd6817d79257526ee (patch) | |
| tree | 8f7df6e5c5048bd5799163be98b0c5fc68e218ea | |
| parent | 26a69ae00c3478f7c7a64f719cc45a482fc4f82b (diff) | |
| download | guix-bd8e7621b880c529cc69102bd6817d79257526ee.tar.gz | |
guix: Build texlive-configuration only when texlive-base is present.
Fixes <https://bugs.gnu.org/48519>. * guix/profiles.scm (texlive-configuration): Build only if texlive-base is present in the profile's manifest.
| -rw-r--r-- | guix/profiles.scm | 19 |
1 files 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 |