anchor.diff:                                         delete_blocks_remaining=BlocksToDelete,
                                          timer_ref=TRef}}.
   
  -deleting({block_deleted, BlockID, DeleterPid},
  +deleting({block_deleted, {ok, BlockID}, DeleterPid},
       State=#state{manifest=Manifest,
                    free_deleters=FreeDeleters,
                    unacked_deletes=UnackedDeletes}) ->
  
positive.code:             %% maybe start more deletes
              State3 = maybe_delete_block(State2),
              {next_state, deleting, State3}
      end.
  
  handle_event(_Event, StateName, State) ->
      {next_state, StateName, State}.
  
negative.code:     Args = [Bucket, Key, UUID, RiakcPid, Options],
      gen_fsm:start_link(?MODULE, Args, []).
  
  -spec block_deleted(pid(), {ok, integer()} | {error, binary()}) -> ok.
  block_deleted(Pid, Response) ->
      gen_fsm:send_event(Pid, {block_deleted, Response, self()}).
  
  %% ====================================================================
  %% gen_fsm callbacks
  