The Trunk: Tools-cmm.548.mcz

Chris Muller uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-cmm.548.mcz

==================== Summary ====================

Name: Tools-cmm.548
Author: cmm
Time: 10 March 2015, 5:06:48.163 pm
UUID: 3f13d433-cdc9-4b04-b7fb-ef4ffcb7bdc4
Ancestors: Tools-mt.547

- Support new "Filterable Lists by labels only".
- Fix undeclared reference due to renamed inst-var in ObjectExplorer(?).

=============== Diff against Tools-mt.547 ===============

Item was changed:
  ----- Method: IndentingListItemMorph>>matches:in: (in category 'filtering') -----
+ matches: pattern in: model
+ ^ ((PluggableTreeMorph filterByLabelsOnly
+ ifTrue: [ model itemName ]
+ ifFalse: [ self getLabelFor: model ])
+ findString: pattern
+ startingAt: 1
+ caseSensitive: false) > 0!
- matches: pattern in: model
-
- ^ ((self getLabelFor: model) findString: pattern startingAt: 1 caseSensitive: false) > 0 !

Item was changed:
  ----- Method: ObjectExplorer>>chasePointers (in category 'menus - callbacks') -----
  chasePointers
  "Open a PointerFinder on the selected item"
  | path sel savedRoot saved |
  path := OrderedCollection new.
  sel := currentSelection.
  [ sel isNil ] whileFalse: [ path addFirst: sel asString. sel := sel parent ].
  path addFirst: #openPath.
  path := path asArray.
+ savedRoot := root.
- savedRoot := rootObject.
  saved := self object.
+ [ root := nil.
- [ rootObject := nil.
  self changed: #getList.
  (Smalltalk includesKey: #PointerFinder)
  ifTrue: [PointerFinder on: saved]
  ifFalse: [self objectReferencesToSelection ]]
+ ensure: [ root := savedRoot.
- ensure: [ rootObject := savedRoot.
  self changed: #getList.
  self changed: path.
  ]!

Item was removed:
- ----- Method: PreDebugWindow>>createImplementingMethod (in category '*Tools-Debugger') -----
- createImplementingMethod
- model createImplementingMethod.!

Item was removed:
- ----- Method: PreDebugWindow>>createMethod (in category '*Tools-Debugger') -----
- createMethod
- model createMethod!

Item was removed:
- ----- Method: PreDebugWindow>>createOverridingMethod (in category '*Tools-Debugger') -----
- createOverridingMethod
- model createOverridingMethod!