<slot-editor> ( close-hook update-hook ref -- gadget )

Vocabulary

ui.tools.inspector.slots

Inputs

close-hook	an object
update-hook	an object
ref	an object

Outputs

gadget

an object

Definition

USING: accessors kernel ui.gadgets ui.gadgets.editors
ui.gadgets.scrollers ui.gadgets.toolbar ui.gadgets.tracks
ui.tools.common ;

IN: ui.tools.inspector.slots

: <slot-editor> ( close-hook update-hook ref -- gadget )
    vertical slot-editor new-track with-lines swap >>ref
    swap >>update-hook swap >>close-hook
    add-toolbar <source-editor> >>text
    dup text>> margins <scroller> white-interior 1 track-add
    dup revert ;