send-action$ ( view event gesture -- )

Vocabulary

ui.backend.cocoa.views

Inputs

view	an object
event	an object
gesture	an object

Outputs

None

Definition

USING: kernel ui.gestures ui.private ;

IN: ui.backend.cocoa.views

: send-action$ ( view event gesture -- )
    [ drop window ] dip over [ send-action ] [ 2drop ] if ;