From f59ec1de9494a3c6c571d573b450d87b8044d4bf Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Tue, 20 Oct 2020 15:38:41 +0200 Subject: graph: Fix typo in docstring. * guix/graph.scm (shortest-path): Fix typo in docstring. --- guix/graph.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'guix/graph.scm') diff --git a/guix/graph.scm b/guix/graph.scm index b695ca4306..fe446eefb4 100644 --- a/guix/graph.scm +++ b/guix/graph.scm @@ -142,7 +142,7 @@ typically returned by 'node-edges' or 'node-back-edges'." nodes node-edges)) (define (shortest-path node1 node2 type) - "Return as a monadic value the shorted path, represented as a list, from + "Return as a monadic value the shortest path, represented as a list, from NODE1 to NODE2 of the given TYPE. Return #f when there is no path." (define node-edges (node-type-edges type)) -- cgit v1.2.3 From 16155bbeb89e3a9c5c6b75613c1e838aa1f3f59a Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Thu, 22 Oct 2020 10:41:06 +0200 Subject: graph: Don't insist on "Helvetica" in the Graphviz backend. Suggested by Fulbert . * guix/graph.scm (emit-node): Use "sans" instead of "Helvetica". --- guix/graph.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'guix/graph.scm') 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];~%" -- cgit v1.2.3