Debugging my event handler for the mouse move event, I wrote this code:
unless (scrollDelta == Tuple 0 0) $ trace (show scrollDelta) \\_ -> do ...