anchor.diff:      UpdFileSet = twop_set:del_element(CurrentManifest, FileSet),
       UpdState = State#state{current_fileset=UpdFileSet,
                              current_files=RestManifests},
  -    gen_fsm:send_event(?SERVER, continue),
  +    gen_fsm:send_event(self(), continue),
       {reply, ok, initiating_file_delete, UpdState};
   waiting_file_delete({Pid, {error, _Reason}},
                       _From,
                       State=#state{delete_fsm_pid=Pid,
                                    current_files=[_ | RestManifests]}) ->
       UpdState = State#state{current_files=RestManifests},
  -    gen_fsm:send_event(?SERVER, continue),
  +    gen_fsm:send_event(self(), continue),
       {reply, ok, initiating_file_delete, UpdState};
   waiting_file_delete(status, _From, State) ->
       Reply = {ok, {waiting_file_delete, status_data(State)}},
  
positive.code:                                         current_riak_object=RiakObj,
                                          riak=RiakPid}=State) ->
      finish_file_delete(twop_set:size(FileSet), FileSet, RiakObj, RiakPid),
      gen_fsm:send_event(?SERVER, continue),
      {next_state, fetching_next_fileset, State#state{batch=RestKeys,
                                                      batch_count=1+BatchCount}};
  initiating_file_delete(continue, #state{current_files=[NextManifest | _RestManifests],
  
negative.code:                                        batch_skips=BatchSkips+1},
              NextState = fetching_next_fileset
      end,
      gen_fsm:send_event(self(), continue),
      {next_state, NextState, NewStateData};
  fetching_next_fileset(_, State) ->
      {next_state, fetching_next_fileset, State}.
  