anchor.diff:                      {reply, no_socket, monitor_client(Dest, From, State2)}
               end
       end;
  -handle_call(connection_count, _, State) ->
  -    {reply, dict:size(State#ns_connection_pool.sockets), State};
  -handle_call({connection_count, Destination}, _, State) ->
  -    Count = case dict:find(Destination, State#ns_connection_pool.destinations) of
  -        {ok, Sockets} -> length(Sockets);
  -        error         -> 0
  -    end,
  -    {reply, Count, State};
   handle_call({done, Dest, Socket}, {Pid, _} = From, State) ->
       gen_server:reply(From, ok),
       case dict:find(Pid, State#ns_connection_pool.clients) of
  
positive.code: %%
  %%% @doc Connection manager for the more or less arbitrary protocol tcp sockets.
  %%% This gen_server is responsible for keeping track of persistent
  %%% connections to HTTP servers. The only interesting API is
  %%% `connection_count/0' and `connection_count/1'.
  -module(ns_connection_pool).
  
  -export([
          start_link/1,
          connection_count/1,
          connection_count/2,
          update_connection_timeout/2,
          maybe_take_socket/2,
          put_socket/3
      ]).
  
negative.code:         _ ->
              ok
      end.
  
  -spec start_link([{atom(), non_neg_integer()}]) ->
      {ok, pid()} | {error, already_started}.
  