with-pane ( pane quot -- )
Factor handbook » UI framework » Building user interfaces » Pre-made UI gadgets » Pane gadgets

Prev:	gadget. ( gadget -- )
Next:	make-pane ( quot -- gadget )

Vocabulary
ui.gadgets.panes

Inputs

pane	a pane
quot	a quotation

Outputs
None

Word description
Clears the pane and calls the quotation in a new scope where output-stream is rebound to a pane-stream writing to the pane.

See also
make-pane

Definition

USING: io kernel ui.gadgets.panes.private ui.gadgets.scrollers ;

IN: ui.gadgets.panes

: with-pane ( pane quot -- )
    over [
        [ [ scroll>top ] [ clear-pane ] [ <pane-stream> ] tri ]
        dip with-output-stream*
    ] dip scroll-pane ; inline