diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-10-22 10:41:06 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-10-22 17:10:21 +0200 |
commit | 16155bbeb89e3a9c5c6b75613c1e838aa1f3f59a (patch) | |
tree | 1d8135e942124e6720ecebc621378937ecffb609 /guix/graph.scm | |
parent | 2f107f273de3db1d01bdec66b13334edef7ad036 (diff) |
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".
Diffstat (limited to 'guix/graph.scm')
-rw-r--r-- | guix/graph.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/graph.scm b/guix/graph.scm index fe446eefb4..93ff9ef81a 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];~%" |