The Inbox: Tools-fbs.431.mcz

A new version of Tools was added to project The Inbox:
http://source.squeak.org/inbox/Tools-fbs.431.mcz

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

Name: Tools-fbs.431
Author: fbs
Time: 12 December 2012, 3:45:58.812 pm
UUID: e213e412-e052-45c3-b21c-febb66552d27
Ancestors: Tools-fbs.430

Pull StringHolder into those subclasses that actually need it.

Also, recategorise Browser >> #systemCatListKey:from:.

=============== Diff against Tools-fbs.430 ===============

Item was changed:
+ ----- Method: Browser>>systemCatListKey:from: (in category 'system category list') -----
- ----- Method: Browser>>systemCatListKey:from: (in category '*Tools') -----
  systemCatListKey: aChar from: view
  "Respond to a Command key.  I am a model with a code pane, and I also have a listView that has a list of methods.  The view knows how to get the list and selection."
 
  aChar == $f ifTrue: [^ self findClass].
  aChar == $x ifTrue: [^ self removeSystemCategory].
  aChar == $b ifTrue: [^ self recent].
  ^ self classListKey: aChar from: view!

Item was added:
+ ----- Method: DependencyBrowser>>packageListKey:from: (in category 'package list') -----
+ packageListKey: aChar from: view
+ aChar == $f ifTrue: [^ self findClass].
+ ^ self classListKey: aChar from: view!

Item was added:
+ ----- Method: PackagePaneBrowser>>packageListKey:from: (in category 'package list') -----
+ packageListKey: aChar from: view
+ aChar == $f ifTrue: [^ self findClass].
+ ^ self classListKey: aChar from: view!

Item was removed:
- ----- Method: StringHolder>>packageListKey:from: (in category '*Tools') -----
- packageListKey: aChar from: view
- "Respond to a Command key in the package pane in the PackageBrowser"
- aChar == $f ifTrue: [^ self findClass].
- ^ self classListKey: aChar from: view
- !