[Pkg] The Trunk: ToolBuilder-MVC-nice.32.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Mar 12 21:02:40 UTC 2013


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

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

Name: ToolBuilder-MVC-nice.32
Author: nice
Time: 12 March 2013, 10:02:20.283 pm
UUID: daf12aae-1237-4665-955b-ef69eb6b42f2
Ancestors: ToolBuilder-MVC-dtl.31

Correct buildPluggableButton: label could be nil

=============== Diff against ToolBuilder-MVC-dtl.31 ===============

Item was changed:
  ----- Method: MVCToolBuilder>>buildPluggableButton: (in category 'pluggable widgets') -----
  buildPluggableButton: aSpec
  	| widget label state |
  	label := aSpec label.
  	state := aSpec state.
  	widget := PluggableButtonView on: aSpec model
  				getState: (state isSymbol ifTrue:[state])
  				action: aSpec action
  				label: (label isSymbol ifTrue:[label]).
  	self register: widget id: aSpec name.
+ 	label ifNotNil: [label isSymbol
- 	label isSymbol
  		ifTrue: [widget label: (aSpec model perform: label)]
+ 		ifFalse: [widget label: label]].
- 		ifFalse: [widget label: label].
  	self setFrame: aSpec frame in: widget.
+ 	parent ifNotNil: [parent addSubView: widget].
- 	parent ifNotNil:[parent addSubView: widget].
  	^widget!



More information about the Packages mailing list