diff options
| author | Daniel Burrows <dburrows@debian.org> | 2009-04-03 18:46:16 -0700 |
|---|---|---|
| committer | Daniel Burrows <dburrows@debian.org> | 2009-04-03 18:46:16 -0700 |
| commit | 5cf71e0dba996891907348f5be5b9386e32b81a7 (patch) | |
| tree | 900988ea2d1c766e132c6a1fc7bf012cc7aed42c /tools | |
| parent | 8c401236c85d543ca565132bbab5a857867e4b97 (diff) | |
| download | aptitude-5cf71e0dba996891907348f5be5b9386e32b81a7.tar.gz | |
Display the first step of each pruned branch.
Diffstat (limited to 'tools')
| -rwxr-xr-x | tools/resolver-visualize/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/resolver-visualize/Main.hs b/tools/resolver-visualize/Main.hs index bb01f8ee..3fb333d5 100755 --- a/tools/resolver-visualize/Main.hs +++ b/tools/resolver-visualize/Main.hs @@ -1026,7 +1026,7 @@ dotUnprocessedSuccs params step = unprocessed ++ excluded stepNum) <- zip (stepSuccessors step) ([0..] :: [Integer]) ] excluded = [ node (name $ printf "step%d" (stepOrder step)) - ..= ("label", printf "%d nodes..." (stepBranchSize step)) + ..= ("label", printf "Step %d+\n%d nodes..." (stepOrder step) (stepBranchSize step)) ..= ("shape", "plaintext") ..= ("image", cloudImage params) | (Successor { successorStep = step }) <- stepSuccessors step, |