The Trunk: Tools-nice.259.mcz

Nicolas Cellier uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-nice.259.mcz

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

Name: Tools-nice.259
Author: nice
Time: 19 August 2010, 2:21:02.32 pm
UUID: e58f19e4-cc70-4407-b310-c3974730f4af
Ancestors: Tools-eem.258

minor simplification: (as: SortedCollection) asArray -> asArray sort

=============== Diff against Tools-eem.258 ===============

Item was changed:
  ----- Method: SelectorBrowser>>contents:notifying: (in category 'as yet unclassified') -----
  contents: aString notifying: aController
  "Take what the user typed and find all selectors containing it"
 
  | tokens |
  contents := aString.
  classList := #().  classListIndex := 0.
  selectorIndex := 0.
  tokens := contents asString findTokens: ' .'.
  selectorList := Cursor wait showWhile: [
- | raw sorted |
  tokens size = 1
+ ifTrue: [(Symbol selectorsContaining: contents asString) asArray
+ sort: [:x :y | x asLowercase <= y asLowercase]]
- ifTrue: [raw := (Symbol selectorsContaining: contents asString).
- sorted := raw as: SortedCollection.
- sorted sortBlock: [:x :y | x asLowercase <= y asLowercase].
- sorted asArray]
  ifFalse: [self quickList]]. "find selectors from a single example of data"
  self changed: #messageList.
  self changed: #classList.
  ^ true!