Pb with Glamour on Pharo 4? - Moose-dev

6 Jan 2015


      Hi!
Juraj and I did a small UI using Glamour on Pharo 3. Unfortunately, it behaves differently on Pharo 4.
Here is an excerpt of the script:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
    browser := GLMTabulator new.
    browser
    	column: #one;
    	column: [ :c | 
    				c
    					row: #rowOne span: 0.2;
    					row: #rowTwo ].
    browser transmit
    	to: #one;
    	andShow: [ :a | 
    				a list
    					shouldValidate: true;
    					updateOn: GLMItemRemoved from: #yourself;
    					updateOn: GLMItemAdded from: #yourself;
    					updateOn: WSRefresh from: self announcer;
    					display: [ :anObject | Array withAll: self actions ];
    					format: [ :anAction | anAction name ];
    					act: [ :b | actions add: WSAction new ]
    						icon: GLMUIThemeExtraIcons glamorousAdd
    						on: $+
    						entitled: 'Add a new action';
    					act: [ :actionToBeRemoved :b | 
    							actions remove: actionToBeRemoved selection.
    							self refreshList ]
    						icon: GLMUIThemeExtraIcons glamorousRemove
    						on: $-
    						entitled: 'Remove the selected action';
    					act: [ :b | self doAllActions ]
    						icon: GLMUIThemeExtraIcons glamorousGo
    						on: $g
    						entitled: 'Executes all actions' ].
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
On Pharo 3:
On Pharo 4:
The code can be downloaded from the configuration browser. Just look for WorkingSet
Any idea what’s going on?
Cheers,
Alexandre
-- 
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.