The Trunk: ToolBuilder-SUnit-nice.14.mcz

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

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

Name: ToolBuilder-SUnit-nice.14
Author: nice
Time: 30 June 2010, 10:27:57.162 pm
UUID: 727c9741-25e8-422e-a205-6a8bd371dc0c
Ancestors: ToolBuilder-SUnit-ul.13

_ -> :=

=============== Diff against ToolBuilder-SUnit-ul.13 ===============

Item was changed:
  ----- Method: ButtonStub>>isEnabled (in category 'simulating') -----
  isEnabled
+ enabled ifNil: [enabled := spec model perform: spec enabled].
- enabled ifNil: [enabled _ spec model perform: spec enabled].
  ^ enabled!

Item was changed:
  ----- Method: MenuStub>>click: (in category 'as yet unclassified') -----
  click: aString
  | item |
+ item := self items detect: [:ea | ea label = aString] ifNone: [^ self].
- item _ self items detect: [:ea | ea label = aString] ifNone: [^ self].
  item action isSymbol
  ifTrue: [self model perform: item action]
  ifFalse: [item action value]!