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

commits at source.squeak.org commits at source.squeak.org
Wed Feb 9 17:02:24 UTC 2022

Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:

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

Name: ToolBuilder-Morphic-mt.299
Author: mt
Time: 9 February 2022, 6:02:23.491774 pm
UUID: 8c52a1dc-35aa-fc4d-a402-3ea56954dbcd
Ancestors: ToolBuilder-Morphic-mt.298

Slightly recompute the standard button height by using the button-fonts #lineGrid and a different factor. Now the buttons are again a little bit smaller again, like they where originally. But not quite. :-)

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

Item was changed:
  ----- Method: MorphicToolBuilder>>buttonRowHeight (in category 'layout hints') -----
  	| defaultMargins |
  	defaultMargins := PluggableButtonMorph new layoutInset.
  	defaultMargins := defaultMargins ifNil: [0] ifNotNil: [:margins |
  		margins isRectangle
  			ifTrue: [margins top + margins bottom]
  			ifFalse: [margins isPoint
  				ifTrue: [margins y + margins y]
  				ifFalse: [margins + margins]]].
+ 	^ (Preferences standardButtonFont lineGrid asFloat * 1.6) truncated "already includes the system's current #scaleFactor"
- 	^ (Preferences standardButtonFont height asFloat * 2) truncated "already includes the system's current #scaleFactor"
  		+ defaultMargins "already includes the system's current #scaleFactor"
  		+ ((((UserInterfaceTheme current get: #borderWidth for: #PluggableButtonMorph) ifNil: [1]) * RealEstateAgent scaleFactor) truncated * 2)!

More information about the Squeak-dev mailing list