specific-drag? ( object -- ? )

Vocabulary

ui.gadgets.worlds

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the specific-drag class.

Definition

USING: accessors kernel ui.gestures ;

IN: ui.gadgets.worlds

: specific-drag? ( object -- ? )
    dup drag? [ #>> ] [ drop f ] if ;