For clarification: There is a "not" missing at the end. And no changes to the list of factors when absolute values are shown, which is the default.

Best,
Marcel
Am 25.04.2022 10:50:58 schrieb commits at source.squeak.org <commits at source.squeak.org>:
Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1969.mcz

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

Name: Morphic-mt.1969
Author: mt
Time: 25 April 2022, 10:50:38.356234 am
UUID: 0455e656-cb7c-5247-8c3e-3a747a82cdf2
Ancestors: Morphic-tpr.1968

Tweak list of scale factors. Only allow to go above 100% if you choose to only show factors relative to the current platform scale factor.

Well, you can still type-in any custom factor but to select the ones with pre-rendered fonts will be more difficult. For example, when the platform recommends 2.0, then 75%, 100%, 125%, and 150% would be 37.5%, 50%, 62.25%, and 75%. Rounding those to 25% steps would work.

=============== Diff against Morphic-tpr.1968 ===============

Item was changed:
----- Method: TheWorldMainDockingBar>>scaleFactorsOn: (in category 'submenu - extras') -----
scaleFactorsOn: menu

+ | showsRelative presets currentScaleFactor currentPlatformScaleFactor |
+ showsRelative := DisplayScreen relativeScaleFactorEnabled.
- | presets currentScaleFactor currentPlatformScaleFactor |
currentScaleFactor := (Display relativeUiScaleFactor * 100) rounded.
currentPlatformScaleFactor := Display platformScaleFactorKnown
ifTrue: [(Display platformScaleFactor * 100) rounded].
+ showsRelative
+ ifFalse: [presets := 75 to: 300 by: 25]
+ ifTrue: [presets := 100 to: 200 by: 25].
- presets := 75 to: 300 by: 25.

presets do: [:scale |
+ showsRelative ifFalse: [
+ scale = 100 ifTrue: [menu addLine]. "Normal scales."
+ scale = 175 ifTrue: [menu addLine]. "TTCFont used after this line..."].
- scale = 100 ifTrue: [menu addLine]. "Normal scales."
- scale = 175 ifTrue: [menu addLine]. "TTCFont used after this line..."
menu addItem: [:item|
item
+ contents: ('{1}{2}%{3}' format: {
- contents: ('{1}{2}%{3}{4}' format: {
currentScaleFactor = scale ifTrue: [''] ifFalse: [''].
scale.
+ showsRelative ifTrue: [''] ifFalse: [
+ scale = currentPlatformScaleFactor
+ ifTrue: [' (recommended)' translated] ifFalse: ['']] });
- DisplayScreen relativeScaleFactorEnabled
- ifTrue: ['' "macOS"] ifFalse: [
- scale = currentPlatformScaleFactor
- ifTrue: [' (recommended)' translated] ifFalse: ['']].
- scale = 75 ifTrue: [' (low ppi)' translated] ifFalse: ['']
- });
target: Display;
selector: #relativeUiScaleFactor:;
arguments: {scale / 100}]].

menu addLine.
menu addItem: [:item |
item
contents: ((presets includes: currentScaleFactor) not ifTrue: ['' , 'Custom: ' translated, currentScaleFactor, '% ...'] ifFalse: ['' , 'Other scale factor...' translated]);
target: self;
selector: #chooseCustomScaleFactor].!


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220425/732259d8/attachment.html>