get-canvas

   

• (send a-mred:edit get-canvas) -> a  wx:canvas% object

  Returns the ``most active'' of the canvases currently showing this buffer or #f if there is not one.