diff options
| -rw-r--r-- | src/couchdb/couch_view_compactor.erl | 3 | ||||
| -rw-r--r-- | src/couchdb/couch_view_group.erl | 3 |
2 files changed, 6 insertions, 0 deletions
diff --git a/src/couchdb/couch_view_compactor.erl b/src/couchdb/couch_view_compactor.erl index 43fdbc98..0063ef1d 100644 --- a/src/couchdb/couch_view_compactor.erl +++ b/src/couchdb/couch_view_compactor.erl @@ -79,6 +79,9 @@ compact_group(Group, EmptyGroup, DbName) -> maybe_retry_compact(Db, GroupId, NewGroup). maybe_retry_compact(#db{name = DbName} = Db, GroupId, NewGroup) -> + #group{sig = Sig, fd = NewFd} = NewGroup, + Header = {Sig, couch_view_group:get_index_header_data(NewGroup)}, + ok = couch_file:write_header(NewFd, Header), Pid = couch_view:get_group_server(DbName, GroupId), case gen_server:call(Pid, {compact_done, NewGroup}) of ok -> diff --git a/src/couchdb/couch_view_group.erl b/src/couchdb/couch_view_group.erl index ef9b02ad..9c5372a8 100644 --- a/src/couchdb/couch_view_group.erl +++ b/src/couchdb/couch_view_group.erl @@ -17,6 +17,9 @@ -export([start_link/1, request_group/2, request_group_info/1]). -export([open_db_group/2, open_temp_group/5, design_doc_to_view_group/1,design_root/2]). +%% Exports for the compactor +-export([get_index_header_data/1]). + %% gen_server callbacks -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]). |