From: Tim Bunce <Tim.Bunce@pobox.com>
Date: Sun, 30 Sep 2012 09:16:58 +0000 (+0900)
Subject: tweak --showid output
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f91a90e9401a7ffc8383f00898761f81404c1102;p=p5sagit%2FDevel-Size.git

tweak --showid output
---

diff --git a/bin/sizeme_store.pl b/bin/sizeme_store.pl
index b66ac38..688a113 100755
--- a/bin/sizeme_store.pl
+++ b/bin/sizeme_store.pl
@@ -162,7 +162,7 @@ sub leave_node {
             else {
                 $name .= sprintf " +%s", fmt_size($x->{self_size});
             }
-            $name .= " $x->{id}" if $opt_showid;
+            $name .= " #$x->{id}" if $opt_showid;
 
             my @node_attr = (
                 sprintf("label=%s", $dotnode->($name)),