Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-mt.1396.mcz==================== Summary ====================
Name: Kernel-mt.1396
Author: mt
Time: 30 April 2021, 9:16:44.415936 am
UUID: d1ca8229-01e5-b548-9660-5018841eea20
Ancestors: Kernel-nice.1395
Adds support for composition of tool-builder specs such as through DualChangeSorter. There, we need to share the windowSpec.
=============== Diff against Kernel-nice.1395 ===============
Item was added:
+ ----- Method: Model>>buildWindow:with:specs: (in category 'toolbuilder') -----
+ buildWindow: windowSpec with: builder specs: specs
+
+ specs do:[:assoc|
+ | rect action widgetSpec |
+ rect := assoc key.
+ action := assoc value.
+ widgetSpec := action value.
+ widgetSpec ifNotNil:[
+ widgetSpec frame: rect.
+ windowSpec children add: widgetSpec]].
+ ^ windowSpec!
Item was changed:
----- Method: Model>>buildWindowWith:specs: (in category 'toolbuilder') -----
buildWindowWith: builder specs: specs
+
+ ^ self
+ buildWindow: (self buildWindowWith: builder)
+ with: builder
+ specs: specs!
- | windowSpec |
- windowSpec := self buildWindowWith: builder.
- specs do:[:assoc|
- | rect action widgetSpec |
- rect := assoc key.
- action := assoc value.
- widgetSpec := action value.
- widgetSpec ifNotNil:[
- widgetSpec frame: rect.
- windowSpec children add: widgetSpec]].
- ^windowSpec!