[Pkg] The Trunk: Tools-ul.287.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Dec 12 22:43:36 UTC 2010

Levente Uzonyi uploaded a new version of Tools to project The Trunk:

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

Name: Tools-ul.287
Author: ul
Time: 12 December 2010, 11:32:10.018 pm
UUID: 68f13d34-18be-4340-aaa4-ddeae963a37e
Ancestors: Tools-mtf.286

- use UIManager for class selection in Browser >> #findClass

=============== Diff against Tools-mtf.286 ===============

Item was changed:
  ----- Method: Browser>>findClass (in category 'system category functions') -----
  	"Search for a class by name."
- 	| pattern foundClass |
+ 	| foundClass |
  	(multiWindowState notNil
  	 or: [self okToChange]) ifFalse:
  		[^self classNotFound].
+ 	foundClass := UIManager default chooseClassOrTrait.
- 	pattern := UIManager default request: 'Class name or fragment?'.
- 	pattern isEmpty ifTrue: [^self classNotFound].
- 	foundClass := Utilities classFromPattern: pattern withCaption: ''.
  	foundClass ifNil: [^self classNotFound].
  	(self selectedClass notNil
  	 and: [multiWindowState notNil
  	 "Can only support multi-window if original window has all the right panes."
  	 and: [multiWindowState prototype isHierarchy not]]) ifTrue:
  		[(self classList includes: foundClass name)
  			ifTrue: [multiWindowState copyWindow]
  			ifFalse: [multiWindowState addNewWindow]].
   	self selectCategoryForClass: foundClass.
  	self selectClass: foundClass!

More information about the Packages mailing list