Faculty of Information Technology
Software Engineering Group

Opened 3 years ago

#141 new defect

Wrong example in WinWorkstation>> pixelSizesInFamily

Reported by: Patrik Svestka Owned by:
Priority: minor Milestone:
Component: default Keywords:
Cc: Also affects CVS HEAD (eXept version): no

Description

The example below the code does not work

pixelSizesInFamily:aFamilyName face:aFaceName style:aStyleName filtering:filterBlock
    "return a set of all available font pixel sizes in aFamily/aFace/aStyle on this display.
     Redefined to handle the special case of 0-size (which stands for any)"

    |sizes|

    sizes := super pixelSizesInFamily:aFamilyName face:aFaceName style:aStyleName filtering:filterBlock.
    (sizes notNil and:[sizes includes:0]) ifTrue:[
        "special: size 0 means:
         there are scaled versions in all sizes available"

        ^ #(6 8 10 12 13 14 15 16 18 20 22 24 28 32 48 64)
    ].
    ^ sizes

    "
     Display pixelSizesInFamily:'courier' face:'bold' style:'roman'
    "

I have a patch, I'll publish it when I get to it.

Change History (0)

Note: See TracTickets for help on using tickets.