[squeak-dev] The Trunk: System-mt.1288.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Jan 18 08:42:21 UTC 2022
Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.1288.mcz
==================== Summary ====================
Name: System-mt.1288
Author: mt
Time: 18 January 2022, 9:42:09.498362 am
UUID: 9445d12f-8216-924e-b3aa-cef0cf0830e1
Ancestors: System-mt.1287
Makes font-change code in UI themes more robust. While there is still no support for set emphasized fonts as #default (or #defaultFixed), we can at least not show a debugger when users try to do so but fall back on the regular, non-emphasized font.
=============== Diff against System-mt.1287 ===============
Item was changed:
----- Method: UserInterfaceTheme>>installFixedFont: (in category 'private - fonts') -----
installFixedFont: aFont
"Establish the default fixed text font and style"
| aStyle |
self flag: #todo. "mt: Support derivatives such as bold and italic."
aStyle := aFont textStyle.
+ aStyle defaultFontIndex: (aStyle fontIndexOfPointSize: aFont pointSize "drop emphasis").
- aStyle defaultFontIndex: (aStyle fontIndexOf: aFont).
TextStyle setDefaultFixed: aStyle.!
Item was changed:
----- Method: UserInterfaceTheme>>installSystemFont: (in category 'private - fonts') -----
installSystemFont: aFont
"Establish the default text font and style"
| aStyle |
self flag: #todo. "mt: Support derivatives such as bold and italic."
aStyle := aFont textStyle.
+ aStyle defaultFontIndex: (aStyle fontIndexOfPointSize: aFont pointSize "drop emphasis").
- aStyle defaultFontIndex: (aStyle fontIndexOf: aFont).
TextStyle setDefault: aStyle.
RealEstateAgent resetScaleFactor.
Flaps replaceToolsFlap.
ScriptingSystem resetStandardPartsBin.!
More information about the Squeak-dev
mailing list
|