summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Burrows <dburrows@debian.org>2009-04-12 15:57:29 -0700
committerDaniel Burrows <dburrows@debian.org>2009-04-12 15:57:29 -0700
commit198eb45793f360b8972696c53ea934dd7c4da683 (patch)
treeab5e904fa0b326d6f4f520cb5fea2225f03adba0
parent31a57528ed2ab5593d1f9342cbf5a50e5a782779 (diff)
downloadaptitude-198eb45793f360b8972696c53ea934dd7c4da683.tar.gz
Another improvement to the label that gets shown for large promotions.
-rw-r--r--tools/resolver-visualize/DotRender.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/resolver-visualize/DotRender.hs b/tools/resolver-visualize/DotRender.hs
index 57eba7b4..bcc56322 100644
--- a/tools/resolver-visualize/DotRender.hs
+++ b/tools/resolver-visualize/DotRender.hs
@@ -119,7 +119,7 @@ dotPromotions params step =
(show $ promotionTier p)
(concat $ intersperse "\n"
[pp c | c <- Set.toList $ promotionChoices p])
- else printf "(%s\n%d choices...)"
+ else printf "%s\n%d choices..."
(show $ promotionTier p)
(Set.size $ promotionChoices p)