| o i |
o :=  #[76 97 32 76 97 32 76 97 110 100] asString asText.
i := GTInspector openOn: o.
[ 1 second wait.
o
    addAttribute: TextEmphasis struckOut;
    append: #[77 111 111 110 108 105 103 104 116] asString.
i model update ] fork.

;)

Cheers,

Hernán

Reply via email to