Simplify the mouse helpers for the common case

Use the following if you need fancier stuff:

    on “click” getMouseEvent (\me -> …)