anchor.diff:      Req = #rpbyokozunaindexputreq{
           index = #rpbyokozunaindex{name = Index, schema = SchemaName}
       },
  +    gen_server:call(Pid, {req, Req, Timeout}, CallTimeout).
  +
  +
  +%% @doc Create a search index.
  +-spec delete_search_index(pid(), binary()) ->
  +                    ok | {error, term()}.
  +delete_search_index(Pid, Index) ->
  +    delete_search_index(Pid, Index, []).
  +
  +%% @doc Create a search index.
  +-spec delete_search_index(pid(), binary(), search_admin_opts()) ->
  +                    ok | {error, term()}.
  +delete_search_index(Pid, Index, Opts) ->
  +    Timeout = proplists:get_value(timeout, Opts, default_timeout(search_timeout)),
  +    CallTimeout = proplists:get_value(call_timeout, Opts, default_timeout(search_call_timeout)),
  +    Req = #rpbyokozunaindexdeletereq{name = Index},
       gen_server:call(Pid, {req, Req, Timeout}, CallTimeout).
   
   
  
positive.code:                  ok = ?MODULE:counter_incr(Pid, Bucket, Key, -5, [{w, quorum}, {pw, one}, {dw, all}]),
                   ?assertEqual({ok, 5}, ?MODULE:counter_val(Pid, Bucket, Key, [{pr, one}]))
               end)},
       {"create a search index / get / list",
       ?_test(begin
                  reset_riak(),
                  {ok, Pid} = start_link(test_ip(), test_port()),
  
negative.code: 
  process_response(#request{msg = #rpbyokozunaschemaputreq{}},
                   rpbputresp, State) ->
      {reply, ok, State};
  
  process_response(#request{msg = #rpbyokozunaindexputreq{}},
                   rpbputresp, State) ->
      {reply, ok, State};
  
  process_response(#request{msg = #rpbyokozunaindexdeletereq{}},
                   rpbdelresp, State) ->
      {reply, ok, State};
  
  process_response(#request{msg = #rpbyokozunaindexgetreq{}},
  