anchor.diff:  write(Host, BlobID, Bytes) when is_atom(Host) ->
       case erlduce_utils:host() of
           Host -> p_write(BlobID, Bytes, Host);
  -        _ -> gen_server:call({?MODULE, ?Node(Host)}, {write, BlobID, Bytes})
  +        _ -> gen_server:call({?MODULE, ?Node(Host)}, {write, BlobID, Bytes, Host})
       end;
   write(Hosts, BlobID, Bytes) when is_list(Hosts) ->
       Resps = erlduce_utils:pmap(fun(Host)-> write(Host,BlobID,Bytes) end, Hosts),
  
positive.code: handle_call( {write, BlobID, Bytes, Host}, _From, State) ->
      {reply , p_write(BlobID, Bytes, Host), State};
  
  handle_call( _Request, _From, State) ->
      {reply, ignored, State}.
  
  
  
negative.code:     prim_file:delete(Filename),
      {noreply, State};
  
  handle_cast( Msg, State) ->
      lager:warning("ignored cast: ~p",[Msg]),
      {noreply, State}.
  
  
  handle_info( Info, State) ->
      lager:warning("ignored info: ~p",[Info]),
      {noreply, State}.
  
  
  