diff -r 692dba3782da -r 429daeba4b8b extensions.st --- a/extensions.st Wed Jul 09 22:49:25 2014 +0200 +++ b/extensions.st Thu Jul 10 14:20:42 2014 +0200 @@ -95,6 +95,16 @@ ^ #() ! ! +!Bag methodsFor:'inspecting'! + +inspectorExtraAttributes + "extra (pseudo instvar) entries to be shown in an inspector." + + ^ super inspectorExtraAttributes + add:('-histogram' -> [ (self sortedCounts collect:[:e| e displayString]) asStringCollection asString ]); + yourself +! ! + !Behavior methodsFor:'inspecting'! inspectorExtraAttributes @@ -2341,7 +2351,7 @@ !stx_libtool class methodsFor:'documentation'! extensionsVersion_CVS - ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.127 2014-07-09 16:21:51 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.128 2014-07-10 12:20:42 cg Exp $' ! ! !stx_libtool class methodsFor:'documentation'!