method private _cb__table_selection_changed = fun () ->
    match self#_get_selection with
      | Some ((_, { td_model = model; td_table = table }), _) ->
          self#_set_column_model model
      | _ ->
          self#_set_column_model column_model