Marcel Taeumel uploaded a new version of ToolBuilder-Kernel to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Kernel-mt.88.mcz==================== Summary ====================
Name: ToolBuilder-Kernel-mt.88
Author: mt
Time: 3 May 2015, 3:13:44.5 pm
UUID: 884665b2-d8a4-ba45-baf2-96fe602e2efb
Ancestors: ToolBuilder-Kernel-mt.87
Added support for spacers in tool builder.
=============== Diff against ToolBuilder-Kernel-mt.87 ===============
Item was added:
+ PluggableWidgetSpec subclass: #PluggableSpacerSpec
+ instanceVariableNames: 'extent'
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'ToolBuilder-Kernel'!
Item was added:
+ ----- Method: PluggableSpacerSpec>>buildWith: (in category 'building') -----
+ buildWith: builder
+ ^builder buildPluggableSpacer: self!
Item was added:
+ ----- Method: PluggableSpacerSpec>>color (in category 'accessing') -----
+ color
+
+ ^ super color ifNil: [Color transparent]!
Item was added:
+ ----- Method: PluggableSpacerSpec>>extent (in category 'layout hints') -----
+ extent
+
+ ^ extent ifNil: [5@5]!
Item was added:
+ ----- Method: PluggableSpacerSpec>>extent: (in category 'layout hints') -----
+ extent: aPoint
+
+ extent := aPoint.!
Item was added:
+ ----- Method: PluggableSpacerSpec>>fillSpaceHorizontally (in category 'convenience') -----
+ fillSpaceHorizontally
+
+ self horizontalResizing: #spaceFill.!
Item was added:
+ ----- Method: PluggableSpacerSpec>>fillSpaceVertically (in category 'convenience') -----
+ fillSpaceVertically
+
+ self verticalResizing: #spaceFill.!
Item was added:
+ ----- Method: PluggableSpacerSpec>>horizontalResizing (in category 'accessing') -----
+ horizontalResizing
+
+ ^ super horizontalResizing ifNil: [#rigid]!
Item was added:
+ ----- Method: PluggableSpacerSpec>>verticalResizing (in category 'accessing') -----
+ verticalResizing
+
+ ^ super verticalResizing ifNil: [#rigid]!
Item was added:
+ ----- Method: ToolBuilder>>buildPluggableSpacer: (in category 'widgets required') -----
+ buildPluggableSpacer: aSpec
+
+ ^ self subclassResponsibility!
Item was added:
+ ----- Method: ToolBuilder>>pluggableSpacerSpec (in category 'defaults') -----
+ pluggableSpacerSpec
+ ^ PluggableSpacerSpec!