[Cuis-dev] font support for "struckThrough"

[Gerald Klix]

For me this works nicely:

LabelMorph contents: 'TEST LABEL' struck :: openInHand

but consider the difference between those two morphs:

LabelMorph contents: `'TEST', ' LABEL' struck` :: openInHand.
TextParagraphMorph contents: `'TEST', ' LABEL' struck` :: openInHand.

The reason for this difference is left as an exercise for the reader.


HTH,

Gerald

On 8/17/24 2:38 AM, Mark Volkmann via Cuis-dev wrote:
> label := LabelMorph contents: 'TEST LABEL'.
> label font struckThrough.
> label openInWorld.