[squeak-dev] The Trunk: ToolBuilder-Morphic-mt.284.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Dec 30 14:42:39 UTC 2021


Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.284.mcz

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

Name: ToolBuilder-Morphic-mt.284
Author: mt
Time: 30 December 2021, 3:42:38.688748 pm
UUID: e558fca4-27dc-5949-b08f-c5ddff318500
Ancestors: ToolBuilder-Morphic-mt.283

Complements Morphic-mt.1835

=============== Diff against ToolBuilder-Morphic-mt.283 ===============

Item was changed:
  ----- Method: MorphicToolBuilder>>buildPluggablePanel: (in category 'widgets required') -----
  buildPluggablePanel: aSpec
  
  	| widget |
  	widget := self panelClass new.
  	self register: widget id: aSpec name.
  
  	widget model: aSpec model.
  
  	"Set child dependent layout properties."
  	widget wantsPaneSplitters: (aSpec wantsResizeHandles ifNil: [false]).
  	self setLayoutHintsFor: widget spec: aSpec.
  	widget layoutInset: (aSpec padding ifNil: [0]).
  	widget cellGap: (aSpec spacing ifNil: [
  		widget wantsPaneSplitters
  			ifTrue: [ProportionalSplitterMorph gripThickness]
+ 			ifFalse: [(2 * RealEstateAgent scaleFactor) truncated]]).
- 			ifFalse: [2]]).
  
  	"Now create the children."
  	aSpec children isSymbol
  		ifTrue: [
  			widget getChildrenSelector: aSpec children.
  			widget update: aSpec children]
  		ifFalse: [
  			self buildAll: aSpec children in: widget].
  
  	self setFrame: aSpec frame in: widget.
  	self setLayout: aSpec layout in: widget.
  	
  	parent ifNotNil:[self add: widget to: parent].
  
  	widget borderWidth: 0.
  	self buildHelpFor: widget spec: aSpec. 
  	widget color: Color transparent.
  	
  	^ widget!



More information about the Squeak-dev mailing list