method private _query_gui_update_answer = fun row query input ->
    try
      SQL_db.update_query query
        input.QGUI.qrygi_name
        input.QGUI.qrygi_query
        input.QGUI.qrygi_comment;
      query_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)