Rietveld Code Review Tool
Help | Bug tracker | Discussion group | Source code | Sign in
(707)

Unified Diff: scm/graphviz.scm

Issue 318680043: Fix some warnings about string-delete and string-filter argument order (Closed)
Patch Set: Created 7 years ago
Use n/p to move between diff chunks; N/P to move between comments. Please Sign in to add in-line comments.
Jump to:
View side-by-side diff with in-line comments
Download patch
« no previous file with comments | « no previous file | scm/lily.scm » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: scm/graphviz.scm
diff --git a/scm/graphviz.scm b/scm/graphviz.scm
index 61fa5b1e1b7c3158f97864068cd8eeb6d6f939fe..657fdb23b3e00e5233c583ad8b31bd19ea4c4c84 100644
--- a/scm/graphviz.scm
+++ b/scm/graphviz.scm
@@ -69,7 +69,9 @@
es)
(for-each (lambda (c)
(format out "subgraph cluster_~a {\nlabel= \"~a\"\ncolor=blue\n"
- (string-filter (car c) char-alphabetic?)
+ (if (guile-v2)
+ (string-filter char-alphabetic? (car c))
+ (string-filter (car c) char-alphabetic?))
(car c))
(for-each (lambda (n) (format out "~a\n" n)) (cdr c))
(display "}\n" out))
« no previous file with comments | « no previous file | scm/lily.scm » ('j') | no next file with comments »

Powered by Google App Engine
RSS Feeds Recent Issues | This issue
This is Rietveld f62528b