<gopher-gadget> ( -- gadget )

Vocabulary

gopher.ui

Inputs

None

Outputs

gadget

an object

Definition

USING: accessors kernel models ui.gadgets ui.gadgets.tracks
ui.tools.browser.history ui.tools.common ;

IN: gopher.ui

: <gopher-gadget> ( -- gadget )
    vertical gopher-gadget new-track
    with-lines f <model> >>model dup <history> >>history
    dup <url-field> >>url-field
    add-gopher-toolbar add-gopher-pane ;