anchor.diff:  -spec(fetch(atom(), binary(), function()) ->
                {ok, list()} | {error, any()}).
   fetch(Id, Key, Fun) ->
  -    gen_server:call(Id, {fetch, Key, Fun}).
  +    gen_server:call(Id, {fetch, Key, Fun}, ?DEF_TIMEOUT).
   
   
   %% @doc Store metadata and data
  
positive.code: -spec(put(atom(), #object{}) ->
               ok | {error, any()}).
  put(Id, Object) ->
      gen_server:call(Id, {put, Object}).
  
  
  %% @doc Retrieve an object from the object-storage
  
negative.code:     error_logger:info_msg("~p,~p,~p,~p~n",
                            [{module, ?MODULE_STRING}, {function, "stop/1"},
                             {line, ?LINE}, {body, Id}]),
      gen_server:call(Id, stop, ?DEF_TIMEOUT).
  
  %%--------------------------------------------------------------------
  %% API - object operations.
  