Mantis Bugtracker
  

Viewing Issue Simple Details Jump to Notes ] View Advanced ] Issue History ] Print ]
ID Category Severity Reproducibility Date Submitted Last Update
0004791 [Squeak] Kernel minor always 09-09-06 14:06 09-09-06 14:06
Reporter Krivanek View Status public  
Assigned To
Priority normal Resolution open  
Status new   Product Version 3.10
Summary 0004791: [KernelImageOverride] TextStyle replaceFontsIn:with:
Description TextStyle replaceFontsIn:with:

original:

replaceFontsIn: oldFontArray with: newStyle
    "
    TextStyle replaceFontsIn: (TextStyle looseFontsFromFamily: #Accuny) with: (TextStyle named: #Accuny)
    "
    "Try to find corresponding fonts in newStyle and substitute them for the fonts in oldFontArray"

    newStyle fontArray do: [ :newFont | newFont releaseCachedState ].

    oldFontArray do: [ :oldFont | | newFont |
        oldFont reset.
        newFont _ (newStyle fontOfPointSize: oldFont pointSize) emphasis: oldFont emphasis.
        oldFont becomeForward: newFont ].

    StringMorph allSubInstancesDo: [ :s | s layoutChanged ].
    TextMorph allSubInstancesDo: [ :s | s layoutChanged ].
    SystemWindow allInstancesDo: [ :w | [ w update: #relabel ] on: Error do: [ :ex | ] ].
    World ifNotNilDo: [ :w | w changed ].

override:

replaceFontsIn: oldFontArray with: newStyle
    "
    TextStyle replaceFontsIn: (TextStyle looseFontsFromFamily: #Accuny) with: (TextStyle named: #Accuny)
    "
    "Try to find corresponding fonts in newStyle and substitute them for the fonts in oldFontArray"

    newStyle fontArray do: [ :newFont | newFont releaseCachedState ].

    oldFontArray do: [ :oldFont | | newFont |
        oldFont reset.
        newFont := (newStyle fontOfPointSize: oldFont pointSize) emphasis: oldFont emphasis.
        oldFont becomeForward: newFont ].

    UIManager default onFontsChanged.


Morphic dependent part replaced with new UIManager message
Additional Information
Attached Files

- Relationships

There are no notes attached to this issue.

- Issue History
Date Modified Username Field Change
09-09-06 14:06 Krivanek New Issue


Mantis 1.0.8[^]
Copyright © 2000 - 2007 Mantis Group
27 total queries executed.
24 unique queries executed.
Powered by Mantis Bugtracker