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