anchor.diff:      end;
   run(update, KeyGen, ValueGen, State) ->
       {NextUrl, S2} = next_url(State),
  -    case do_get(url(NextUrl, KeyGen, State#state.path_params)) of
  +    case do_get(url(NextUrl, KeyGen, State#state.path_params), State) of
           {error, Reason} ->
               {error, Reason, S2};
   
           {not_found, Url} ->
  -            case do_put(Url, [], ValueGen) of
  +            case do_put(Url, [], ValueGen, State) of
                   ok ->
                       {ok, S2};
                   {error, Reason} ->
  
positive.code:             {error, Reason}
      end.
  
  do_delete(Url, Headers) ->
      case send_request(Url, Headers, delete, [], []) of
          {ok, "204", _Header, _Body} ->
              ok;
          {ok, "404", _Header, _Body} ->
  
negative.code: 
          {ok, Url, Headers} ->
              Vclock = lists:keyfind("X-Riak-Vclock", 1, Headers),
              case do_put(Url, [State#state.client_id, Vclock], ValueGen, State) of
                  ok ->
                      {ok, S2};
                  {error, Reason} ->
  