method columns_in_index =
match idx_select#store2#get_iter_first with
| None -> []
| Some iter ->
let rec fetch = fun () ->
let data = idx_select#store2#get_data ~row:iter in
if idx_select#store2#iter_next iter then
data :: (fetch ())
else
[data]
in
fetch ()