anchor.diff:  delete(Level, ModelName, Key, Pred) ->
       case exec_driver(ModelName, level_to_driver(Level), delete, [Key, Pred]) of
           ok ->
  -            spawn(fun() -> catch delete_links(disk_only, Key, ModelName, all) end),
  -            spawn(fun() -> catch delete_links(global_only, Key, ModelName, all) end),
  -            spawn(fun() -> catch delete_links(local_only, Key, ModelName, all) end),
  +            spawn(fun() -> catch delete_links(?DISK_ONLY_LEVEL, Key, ModelName, all) end),
  +            spawn(fun() -> catch delete_links(?GLOBAL_ONLY_LEVEL, Key, ModelName, all) end),
  +            %% @todo: uncomment following line when local cache will support links
  +            % spawn(fun() -> catch delete_links(?LOCAL_ONLY_LEVEL, Key, ModelName, all) end),
               ok;
           {error, Reason} ->
               {error, Reason}
  
positive.code: %% @end
  %%--------------------------------------------------------------------
  -spec level_to_driver(Level :: store_level()) -> [Driver :: atom()].
  level_to_driver(disk_only) ->
      ?PERSISTENCE_DRIVER;
  level_to_driver(local_only) ->
      ?LOCAL_CACHE_DRIVER;
  level_to_driver(global_only) ->
      ?DISTRIBUTED_CACHE_DRIVER;
  level_to_driver(locally_cached) ->
      [?LOCAL_CACHE_DRIVER, ?PERSISTENCE_DRIVER];
  level_to_driver(globally_cached) ->
      [?DISTRIBUTED_CACHE_DRIVER, ?PERSISTENCE_DRIVER].
  
  %%--------------------------------------------------------------------
  
negative.code: %%--------------------------------------------------------------------
  -spec driver_to_level(atom()) -> store_level().
  driver_to_level(?PERSISTENCE_DRIVER) ->
      ?DISK_ONLY_LEVEL;
  driver_to_level(?LOCAL_CACHE_DRIVER) ->
      ?LOCAL_ONLY_LEVEL;
  driver_to_level(?DISTRIBUTED_CACHE_DRIVER) ->
      ?GLOBAL_ONLY_LEVEL.
  
  %%--------------------------------------------------------------------
  %% @private
  