anchor.diff:      {ok, State}.
   
   %% @private
  -handle_call({server,IndexId,Term,Create}, _From, Dict = State) ->
  +handle_call({server, IndexId, Term, Create}, _From, Dict = State) ->
       Reply =
           case {sdict:find(Term, Dict),Create} of
  -            {{ok,Value},_} ->
  +            {{ok, Value}, _} ->
                   Value;
  -            {error,false} ->
  +            {error, false} ->
                   undefined;
  -            {error,true} ->
  +            {error, true} ->
                   SupRef = doko_index_term_sup:name(IndexId),
                   {ok, Server} = supervisor:start_child(SupRef, []),
                   sdict:store(Term, Server, Dict),
  
positive.code: 
  %% @private
  code_change(_OldVsn, State, _Extra) ->
      {ok,State}.
  
  %% Local variables:
  %% mode: erlang
  
negative.code: -behaviour(gen_server).
  
  %% API
  -export([server/2, server/3]).
  -export([name/1]).
  -export([start_link/1]).
  
  %% gen_server callbacks
  -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2,
           code_change/3]).
  
  %%----------------------------------------------------------------------------
  