button-down-event$ ( event window -- )

Vocabulary

x11.events

Inputs

event	an object
window	an object

Outputs

None

Definition

USING: kernel ;

IN: x11.events

: button-down-event$ ( event window -- )
    over mouse-scroll? [ scroll-event ] [ button-down-event ] if
    ;