(document:surround "/std/frame") (label "Services") (vbox( (label "Enabled") (document:id enabled (listbox rows (woo-list-names '/services))))) (vbox( (label "Disabled") (document:id disabled (listbox rows (woo-list-names '/services))))) (hbox (button "Disable" (on-click (woo-write '/services 'command 'disable 'param (enabled text)))) (button "Enable" (on-click (woo-write '/services 'command 'enable 'param (disabled text))))) (vbox (label "test")) (groupbox "group" (layout-policy 100 100) (vbox (groupbox "group1" (layout-policy -1 50 left)) (groupbox "group2" (layout-policy -1 20)) (groupbox "group3" (layout-policy -1 30 right)))) (frame:buttons-view (button "Quit" (on-click (document:end))))