[Moose-dev] MOFormsShape and MOChildrenShape

Hi! I fixed a bug uncovered by Doru. Not easy to get this formsshape properly working. If you fix any bugs, let me know. Does anyone needs to nest a formsshape into another formsshape ? The following script does not work. -=-=-=-=-=-=-=-=-=-=-=-= | builder1 builder2 | builder1 := MOFormsBuilder new. builder1 row; fill; pref; grow; row; pref. builder1 column; pref. builder1 x: 1 y: 1 add: (MORectangleShape new text: [:each | each printString]). builder1 x: 1 y: 2 add: (MOChildrenShape new). builder2 := MOFormsBuilder new. builder2 row; fill; pref; grow; row; pref; row; pref. builder2 column; pref. builder2 x: 1 y: 1 add: (MORectangleShape new text: [:each | each printString]). builder2 x: 1 y: 2 add: (MOChildrenShape new). builder2 x: 1 y: 3 add: (builder1 asShape). view shape: builder2 asShape. view nodes: #(10 20 30 ) forEach: [:each | view nodes: (1 to: each )] -=-=-=-=-=-=-=-=-=-=-=-= But I first want to concentrate on the situation we need now. Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.