method private _remove_index_from_store = fun name ->
    let rref = ref None in
      index_model#foreach
        (fun path iter ->
           let idx = index_model#get_data ~row:iter in
             if idx.SQL_db.idx_name = name then begin
               rref := Some (index_model#get_row_reference path);
               true
         end else
           false);
      match !rref with
        | None      -> ()
        | Some rref ->
            let _idx = index_model#get_data ~row:rref#iter in
            (* Index is already unlinked from database *)
            self#_document_changed ();
            i_bool (index_model#remove rref#iter)