Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.1838.mcz
==================== Summary ====================
Name: Morphic-mt.1838 Author: mt Time: 31 December 2021, 11:43:15.451969 am UUID: e3a32f40-b476-184d-be93-04db041a8826 Ancestors: Morphic-mt.1837
Fix reset code of recently changed pragma preferences.
=============== Diff against Morphic-mt.1837 ===============
Item was changed: ----- Method: AbstractResizerMorph class>>gripThickness: (in category 'preferences') ----- gripThickness: anInteger
+ GripThickness := anInteger ifNotNil: [(anInteger / RealEstateAgent scaleFactor) rounded]. - GripThickness := (anInteger / RealEstateAgent scaleFactor) rounded. Project current restoreDisplay. self flag: #todo. "mt: Update existing grips. This is challenging because it interferes with ProportionalLayoutPolicy, which is tricky to refresh from here for arbitrary morphs."!
Item was changed: ----- Method: AbstractResizerMorph class>>handleLength: (in category 'preferences') ----- handleLength: anInteger
+ HandleLength := anInteger ifNotNil: [(anInteger / RealEstateAgent scaleFactor) rounded]. - HandleLength := (anInteger / RealEstateAgent scaleFactor) rounded. Project current restoreDisplay. self flag: #todo. "mt: Update existing grips. This is challenging because it interferes with ProportionalLayoutPolicy, which is tricky to refresh from here for arbitrary morphs."!
Item was changed: ----- Method: Morph class>>preferredCornerRadius: (in category 'preferences') ----- preferredCornerRadius: anInteger
+ PreferredCornerRadius := anInteger ifNotNil: [(anInteger / RealEstateAgent scaleFactor) rounded].! - PreferredCornerRadius := (anInteger / RealEstateAgent scaleFactor) rounded.!
packages@lists.squeakfoundation.org