[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