anchor.diff:  internal_delete(Key, #mediator{config=Config}) ->
     {N,R,W} = unpack_config(Config),
     Servers = membership:nodes_for_key(Key),
  -  MapFun = fun(Server) ->
  -    storage_server:delete(Server, Key, 10000)
  +  Part = membership:partition_for_key(Key),
  +  MapFun = fun(Server) ->
  +    storage_server:delete({list_to_atom(lists:concat([storage_, Part])), Server}, Key, 10000)
     end,
     Blah = pcall(MapFun, Servers),
     {Good, Bad} = Blah,
  
positive.code: internal_put(Key, Context, Value, #mediator{config=Config}) ->
    {N,R,W} = unpack_config(Config),
    Servers = membership:nodes_for_key(Key),
    Incremented = vector_clock:increment(node(), Context),
    MapFun = fun(Server) ->
      storage_server:put(Server, Key, Incremented, Value)
    end,
    {Good, Bad} = pcall(MapFun, Servers),
    if
  
negative.code:   end.
    
  resolve_not_found(Bad, R) ->
    Count = lists:foldl(fun({_, E}, Acc) -> 
      case E of
        not_found -> Acc+1;
        _ -> Acc
  