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

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

Name: Graphics-mt.465
Author: mt
Time: 24 January 2022, 10:32:49.443852 am
UUID: a23aeaa4-eba7-c449-96c4-ae5e038984c0
Ancestors: Graphics-mt.464

Complements System-mt.1292

=============== Diff against Graphics-mt.464 ===============

Item was changed:
  ----- Method: DisplayScreen>>uiScaleFactor: (in category 'scale factor') -----
  uiScaleFactor: aFloat
  	"Sets the effective scale factor for the user interface, i.e., all widgets, tools, and windows. The user can override the CurrentScaleFactor recommended by the platform."
  
  	| oldFactor newFactor |
  	(UserInterfaceTheme current canFakeScaleFactor: aFloat) ifTrue: [
  		self flag: #isTTCBased.
  		^ UserInterfaceTheme current applyScaled: aFloat].
  	
  	oldFactor := RealEstateAgent scaleFactor. "Use effective, pixel-based factor to account for rounding errors. See #isTTCBased and #uiScaleFactor."
+ 	newFactor := aFloat max: 0.75.
- 	newFactor := aFloat max: 1.0.
  	newFactor = oldFactor ifTrue: [^ self].
  	
  	TextStyle pixelsPerInch: 96.0 * aFloat.
  	newFactor := RealEstateAgent resetScaleFactor; scaleFactor. "Again, account for rounding errors."
  	Project current ifNotNil: [:p | p displayScaleChangedFrom: oldFactor to: newFactor].!

Item was removed:
- ----- Method: StrikeFont class>>defaultSized: (in category 'accessing') -----
- defaultSized: aNumber
- 	| fonts f |
- 	"This used to be the default textstyle, but it needs to be a StrikeFont and not a TTCFont and sometimes the default textstyle is a TTCFont.  So, we use a typical StrikeFont as the default fallback font."
- 	fonts := (TextConstants at: #Accuny ifAbsent:[TextStyle default]) fontArray.
- 	f := fonts first.
- 	1 to: fonts size do: [:i |
- 		aNumber > (fonts at: i) height ifTrue: [f := fonts at: i].
- 	].
- 	^f
- !