June 6, 2013
7:45 p.m.
This is elegant :) Doru On Thu, Jun 6, 2013 at 9:21 PM, Stéphane Ducasse <stephane.ducasse@inria.fr>wrote:
So cool :)
something like that ? :)
smalltalkCodeWithStabilo "self smalltalkCodeWithStabilo" | area seg code | area := RubEditingArea new beWrapped; width: 400; updateTextWith: (code := self someSmallSmalltalkCode). area addSegment: (seg := RubPlainSegmentMorph inTextArea: area from: 3 to: code size). seg color: (Color yellow). seg borderColor: (Color orange alpha: 0.5). seg beSmoothCurve. area openInWorld
Alain
<stabilo-selection.png>
-- www.tudorgirba.com "Every thing has its own flow"