This is elegant :) Doru
On Thu, Jun 6, 2013 at 9:21 PM, Stéphane Ducasse <[email protected]>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"
