method unselect ele =
      selection <- None ;
      self#on_unselect ele