method private _index_gui_update_answer = fun row index input ->
try
SQL_db.update_index index
input.IGUI.idxgi_name
input.IGUI.idxgi_columns
input.IGUI.idxgi_unique;
index_model#update_display row#iter
with
| SQL_db.Duplicated_name name ->
raise (Invalid_input "Name already use")
| SQL_db.Invalid_name name ->
raise (Invalid_input "Invalid name");
| SQL_db.Invalid_args s ->
raise (Invalid_input s)