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>
