[squeak-dev] The Trunk: Morphic-mt.1900.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Feb 16 16:08:51 UTC 2022
Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1900.mcz
==================== Summary ====================
Name: Morphic-mt.1900
Author: mt
Time: 16 February 2022, 5:08:45.790238 pm
UUID: 3be7afd2-a52e-8c48-9625-c7f69da116b5
Ancestors: Morphic-tonyg.1899
I forgot to scale the margins in text fields and lists after scale changes. Still not perfect because of rounding errors. In this case, it is a #truncated vs. #rounded thing. In this case, we use #truncated in, for example, #textMargins because we do not want to use 2px-widths for 150% or 175% scaling.
=============== Diff against Morphic-tonyg.1899 ===============
Item was added:
+ ----- Method: PluggableListMorph>>displayScaleChangedBy: (in category 'display scale') -----
+ displayScaleChangedBy: factor
+
+ | currentMargins |
+ super displayScaleChangedBy: factor.
+ (currentMargins := self listMorph cellInset) isRectangle
+ ifTrue: [self listMorph cellInset: ((currentMargins origin * factor) rounded corner: (currentMargins corner * factor) rounded)]
+ ifFalse: [self listMorph cellInset: (currentMargins * factor) rounded].!
Item was added:
+ ----- Method: PluggableTextMorph>>displayScaleChangedBy: (in category 'display scale') -----
+ displayScaleChangedBy: factor
+
+ | currentMargins |
+ super displayScaleChangedBy: factor.
+ (currentMargins := self textMorph margins) isRectangle
+ ifTrue: [self textMorph margins: ((currentMargins origin * factor) rounded corner: (currentMargins corner * factor) rounded)]
+ ifFalse: [self textMorph margins: (currentMargins * factor) rounded].!
More information about the Squeak-dev
mailing list
|