summaryrefslogtreecommitdiff
path: root/Command/Map.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-02-08 18:26:38 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-02-08 18:26:38 -0400
commit81e045a539e5877d445abaa53783f94f4e17513a (patch)
tree26713aada4c764787d7c3519b1ed9c98fa14d197 /Command/Map.hs
parentc1b69d1511cd9a6d63981f74f6d926d59dba7c8c (diff)
tweak
Diffstat (limited to 'Command/Map.hs')
-rw-r--r--Command/Map.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Map.hs b/Command/Map.hs
index 74005b521..0a3bb9fff 100644
--- a/Command/Map.hs
+++ b/Command/Map.hs
@@ -100,7 +100,7 @@ nodeId r =
node :: (M.Map UUID String) -> [Git.Repo] -> Git.Repo -> String
node umap fullinfo r = unlines $ n:edges
where
- n = Dot.subGraph (hostname r) (basehostname r) "grey" $
+ n = Dot.subGraph (hostname r) (basehostname r) "lightblue" $
decorate $ Dot.graphNode (nodeId r) (repoName umap r)
edges = map (edge umap fullinfo r) (Git.remotes r)
decorate