anchor.diff:          % duplicates will be removed in flush_sync_inbox, current code works
           % correctly.
   
  -        if Requests == [], Distance > ?NREPLICAS ->
  +        Nrepl = proplists:get_value(nrepl, InfoPack),
  +        if Requests == [], Distance > Nrepl ->
                   gen_server:cast(From, {kill_domain, "Distant domain"});
           Requests == [] -> ok;
           true ->
  
positive.code:         error_logger:warning_report({"Replication failed!"}),
          failed;
  
  replicate_proc({DServer, DomainID, EntryID, Entry} = R, Tries) ->
          % XXX: This is the correct line:
          %Me = {net_adm:localhost(), node(), self()},
          % XXX: This is for debugging:
  
negative.code: %%% Put with replication
  %%%
  
  replicate(#domain{db = DB, size = Size, id = DomainID, info = InfoPack},
          EntryID, Entry) ->
  
          Nrepl = proplists:get_value(nrepl, InfoPack),
          DServer = self(),
          case do_write(DB, Entry, Size, new_entry) of
                  chunk_full -> chunk_full;
                  _ -> spawn(fun() -> replicate_proc(
                          {DServer, DomainID, EntryID, Entry, Nrepl}, 0)
                          end)
          end.
  
  