From 9fa92acbf0c4dbc734ac7d83b31bd6d12e09a401 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 20 May 2023 15:57:13 +0200 Subject: [PATCH] self: Build against "graphviz-minimal". Fixes . Reported by Andreas Enge . * guix/self.scm (%packages): Change "graphviz" to refer to "graphviz-minimal". Add "font-ghostscript". (info-manual): Define 'font-ghostscript'. [build]: Set XDG_DATA_DIRS. --- guix/self.scm | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/guix/self.scm b/guix/self.scm index 74c953bd50..9e0aa82698 100644 --- a/guix/self.scm +++ b/guix/self.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2017-2022 Ludovic Courtès +;;; Copyright © 2017-2023 Ludovic Courtès ;;; Copyright © 2020 Martin Becze ;;; ;;; This file is part of GNU Guix. @@ -72,7 +72,8 @@ ("gettext-minimal" . ,(ref 'gettext 'gettext-minimal)) ("gcc-toolchain" . ,(ref 'commencement 'gcc-toolchain)) ("glibc-utf8-locales" . ,(ref 'base 'glibc-utf8-locales)) - ("graphviz" . ,(ref 'graphviz 'graphviz)) + ("graphviz" . ,(ref 'graphviz 'graphviz-minimal)) + ("font-ghostscript" . ,(ref 'ghostscript 'font-ghostscript)) ("texinfo" . ,(ref 'texinfo 'texinfo))))) (define (specification->package name) @@ -404,6 +405,9 @@ a list of extra files, such as '(\"contributing\")." (define graphviz (specification->package "graphviz")) + (define font-ghostscript + (specification->package "font-ghostscript")) + (define glibc-utf8-locales (specification->package "glibc-utf8-locales")) @@ -444,6 +448,9 @@ a list of extra files, such as '(\"contributing\")." ;; Build graphs. (mkdir-p (string-append #$output "/images")) + + (setenv "XDG_DATA_DIRS" ;fonts needed by 'dot' + #+(file-append font-ghostscript "/share")) (for-each (lambda (dot-file) (invoke #+(file-append graphviz "/bin/dot") "-Tpng" "-Gratio=.9" "-Gnodesep=.005"