summaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
authorDaniel Burrows <dburrows@debian.org>2009-04-05 09:04:27 -0700
committerDaniel Burrows <dburrows@debian.org>2009-04-05 09:04:27 -0700
commit25162e4dcc1635dcce887ca5cf2e9d62fe17aab4 (patch)
treeca465accd9dff65c453a35786e5287b025d869ff /tools
parent7f84ae4152e4fc5de900ca583da9771c1fc42275 (diff)
downloadaptitude-25162e4dcc1635dcce887ca5cf2e9d62fe17aab4.tar.gz
Use extra outlining to highlight solutions.
Diffstat (limited to 'tools')
-rw-r--r--tools/resolver-visualize/DotRender.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/tools/resolver-visualize/DotRender.hs b/tools/resolver-visualize/DotRender.hs
index aecf7575..42124bed 100644
--- a/tools/resolver-visualize/DotRender.hs
+++ b/tools/resolver-visualize/DotRender.hs
@@ -47,6 +47,7 @@ dotStepNode params step = node (name $ printf "step%d" (stepOrder step))
(show $ solTier $ stepSol step))
<<< Set.null (solBrokenDeps (stepSol step)) `thenDo`
set "style" "filled" `andAlso`
+ set "peripheries" "2" `andAlso`
set "fillColor" "lightgrey"
-- Generate nodes for any successors that were not processed in the
@@ -60,6 +61,7 @@ dotUnprocessedSuccs params step = unprocessed ++ excluded
<<< set "style" "dashed"
<<< Set.null (solBrokenDeps (stepSol step)) `thenDo`
set "style" "dashed,filled" `andAlso`
+ set "peripheries" "2" `andAlso`
set "fillcolor" "lightgrey"
| ((Unprocessed { successorChoice = succChoice,
successorSolution = succSol }),