01/07: graph: Don't insist on "Helvetica" in the Graphviz backend.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 16155bbeb89e3a9c5c6b75613c1e838aa1f3f59a
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Thu Oct 22 10:41:06 2020 +0200

    graph: Don't insist on "Helvetica" in the Graphviz backend.
    
    Suggested by Fulbert <fulbert@bluewin.ch>.
    
    * guix/graph.scm (emit-node): Use "sans" instead of "Helvetica".
---
 guix/graph.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/graph.scm b/guix/graph.scm
index fe446ee..93ff9ef 100644
--- a/guix/graph.scm
+++ b/guix/graph.scm
@@ -238,7 +238,7 @@ NODE1 to NODE2 of the given TYPE.  Return #f when there is 
no path."
 (define (emit-epilogue port)
   (display "\n}\n" port))
 (define (emit-node id label port)
-  (format port "  \"~a\" [label = \"~a\", shape = box, fontname = 
Helvetica];~%"
+  (format port "  \"~a\" [label = \"~a\", shape = box, fontname = sans];~%"
           id label))
 (define (emit-edge id1 id2 port)
   (format port "  \"~a\" -> \"~a\" [color = ~a];~%"