"Adapted from: 'http://ws.stfx.eu/L1VNANJTU6KW'"

browser := GLMTabulator new.
browser title: 'Playgrounds list'.
browser column: #list; column: #inspector.
browser transmit to: #list; andShow: [ :a | a list ].
browser transmit 
	from: #list port: #selection; 
	to: #inspector;
	when: [:selection | selection notNil]; 
	transformed: [ :stringFromList | GTPlayPage new content: stringFromList ]; 
	andShow: [ :a | 
	a custom: GTPlayground new  ].
browser openOn: { 'Smalltalk' . '41+1' }