The Trunk: ToolBuilder-Morphic-ul.69.mcz

Levente Uzonyi uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-ul.69.mcz

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

Name: ToolBuilder-Morphic-ul.69
Author: ul
Time: 12 December 2010, 11:18:43.731 pm
UUID: 3e5e6fe0-da9a-3141-bfd3-a7ad24d63eb7
Ancestors: ToolBuilder-Morphic-rww.68

- use ListChooser for class selection in Morphic

=============== Diff against ToolBuilder-Morphic-rww.68 ===============

Item was added:
+ ----- Method: MorphicUIManager>>chooseClassOrTrait:from: (in category 'ui requests') -----
+ chooseClassOrTrait: label from: environment
+ "Let the user choose a Class or Trait. Use ListChooser in Morphic."
+
+ | names index |
+ names := environment classAndTraitNames.
+ index := self
+ chooseFrom: names
+ lines: #()
+ title: label.
+ index = 0 ifTrue: [ ^nil ].
+ ^environment
+ at: (names at: index)
+ ifAbsent: [ nil ]!