draw-border ( object -- )

Vocabulary

ui.render.private

Inputs

object

an object

Outputs

None

Definition

USING: accessors kernel namespaces opengl ui.pens ui.render ;

IN: ui.render.private

: draw-border ( object -- )
    dup boundary>>
    [ origin get [ draw-boundary ] with-translation ] [ drop ]
    if* ;