diff options
author | Daniel Burrows <dburrows@debian.org> | 2009-04-05 09:04:27 -0700 |
---|---|---|
committer | Daniel Burrows <dburrows@debian.org> | 2009-04-05 09:04:27 -0700 |
commit | 25162e4dcc1635dcce887ca5cf2e9d62fe17aab4 (patch) | |
tree | ca465accd9dff65c453a35786e5287b025d869ff /tools | |
parent | 7f84ae4152e4fc5de900ca583da9771c1fc42275 (diff) | |
download | aptitude-25162e4dcc1635dcce887ca5cf2e9d62fe17aab4.tar.gz |
Use extra outlining to highlight solutions.
Diffstat (limited to 'tools')
-rw-r--r-- | tools/resolver-visualize/DotRender.hs | 2 |
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 }), |