<browser-toolbar> ( browser -- toolbar )


Vocabulary
ui.tools.browser

Inputs
browseran object


Outputs
toolbaran object


Definition
USING: accessors kernel ui.gadgets ui.gadgets.toolbar
ui.gadgets.tracks ;

IN: ui.tools.browser

: <browser-toolbar> ( browser -- toolbar )
[ <toolbar> ] [
search-field>> horizontal <track> 0 >>fill
swap 1 track-add 1 track-add
] bi ;