on-char

Called when the canvas receives a keyboard event.

• (send a-canvas on-char ch) -> void
      ch : key-event% object

  Does nothing.