Hi everybody,

I have this complicated code to draw a line with separators at both ends, I try to put the legend text with #below but nothing is changed :

| view e1 e2 l1 label |

view := RTView new.

label := RTLabeled new
    color: Color black;
    below;
    text: 'Class IIa';
    yourself.

e1 := RTBox new element
    color: Color black;
    height: 10;
    width: 1;
    yourself.
e2 := RTBox new element
    color: Color black;
    height: 10;
    width: 1;
    yourself.
   
l1 := RTStyledMultiLine new
    color: Color black;
    solidLine;
    edgeFrom: e1 to: e2.

view addAll: (Array with: e1 with: e2 with: l1).
l1 @ label.

RTHorizontalLineLayout new on: view elements.
view elements pairsDo: [ :a :b | b translateBy: 100 @ 0 ].
^ view