[View]  [Edit]  [Lock]  [References]  [Attachments]  [History]  [Home]  [Changes]  [Search]  [Help] 

example[spec] Change rendering order of a widget

" select a task, start it "
" swap positions between Task Information and Task Operations "
" self is a MobilePageJSon instance "
| jsObject js coordinatorConf widgetsSpec widgetConf config |
jsObject := self template basicAt: #spec.
js := JS @ jsObject. 
coordinatorConf := js @ #configuration.
widgetsSpec := JS @ coordinatorConf @ #widgets.
widgetConf := JS @ widgetsSpec @ #information.
config := JS @ widgetConf @ #configuration.

" change Task Information position "
JS @ config handleAt: #order put: 6.

widgetConf := JS @ widgetsSpec @ #operations.
config := JS @ widgetConf @ #configuration.

" change Task Operations position "
JS @ config handleAt: #order put: 4.

" refresh rendred UI "
self thread update