anchor.diff:  -define(CACHE_LIMIT_K, (1048576 * 2)).
   
   -export([start_link/0]).
  --export([cache/1, cache/3]).
  +-export([cache/1, cache/3, current_downloads/0]).
   -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]).
   
   start_link() ->
  
positive.code: 	    wait_for_completion1(LocalFileName, Pid, Ref)
      end.
  
  %%---------------------------------------------------------------------------
  
  init(_Args) ->
      {ok, none}.
  
  handle_call(_Request, _From, State) ->
      {noreply, State}.
  
  handle_cast({cache, Url}, State) ->
      start_caching(Url),
  
negative.code: 
  cache(Url, Pid, Ref) ->
      gen_server:cast(urlcache, {cache, Url, Pid, Ref}).
  
  current_downloads() ->
      gen_server:call(urlcache, current_downloads).
  
  %%---------------------------------------------------------------------------
  
  