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".master
parent
2f107f273d
commit
16155bbeb8
|
@ -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];~%"
|
||||
|
|
Reference in New Issue