gtInspectorMagritteIn: composite <gtInspectorPresentationOrder: 30> | table | table := composite table title: 'Magritte'; display: [ self magritteDescription children collect: [ :desc | desc label -> (desc toString: (desc accessor read: self)) ] ]; column: 'Field' evaluated: #key; column: 'Value' evaluated: #value; send: #value descriptionName <magritteDescription> ^ MAStringDescription new accessor: #name; label: 'Name'; priority: 100; yourself descriptionPages etc... <http://forum.world.st/file/n4817448/Screenshot_2015-04-04_00.png> ----- Cheers, Sean -- View this message in context: http://forum.world.st/Magritte-Auto-GT-Presentation-tp4817448.html Sent from the Pharo Smalltalk Developers mailing list archive at Nabble.com.