[Moose-dev] multi-line label

Dear List, I was wondering why a UML diagram cannot be obtained through: -=-=-=-=-=-=-=-=-=-=-=-= | builder view | builder := MOFormsBuilder new. builder column; fill. builder row; fill; row; fill. builder x: 1 y: 1 add: (MORectangleShape new). builder x: 1 y: 1 add: (MOLabelShape new text: [:cls | cls name]). builder x: 1 y: 2 add: (MORectangleShape new). builder x: 1 y: 2 add: (MOLabelShape new text: [:cls | cls methodDict keys inject: '' into: [:sum :el | sum, el, String cr]]). view := MOViewRenderer new. view nodeShape: builder shape. view draggable. view popupText. view nodes: {MONExplicitIdentityNormalizer}. view layout: MOTreeLayout new. view open -=-=-=-=-=-=-=-=-=-=-=-= This is not polished, but having multi-lines label seems to be interesting... Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.