<viewport> ( content model -- viewport )

Vocabulary

ui.gadgets.viewports

Inputs

content	a gadget
model	a model

Outputs

viewport

a new viewport

Word description

Creates a new viewport containing content.

See also

<scroller>

Definition

USING: accessors kernel ui.gadgets ;

IN: ui.gadgets.viewports

: <viewport> ( content model -- viewport )
    viewport new swap >>model t >>clipped? swap add-gadget ;