dragging? in mouse-event%

Returns #t if this was a dragging event (motion while a button is pressed), #f otherwise.

• (send a-mouse-event dragging?) -> boolean