anchor.diff:  -spec get_server_configs() -> {Pools :: term(), Servers :: term()}.
   get_server_configs() ->
       ServerList = case application:get_env(erldns, servers) of
  -                    undefined ->
  -                        [];
  -                    {ok, ServerList0} ->
  -                        ServerList0
  +                     undefined ->
  +                         [];
  +                     {ok, ServerList0} ->
  +                         ServerList0
                    end,
       {Pools, Servers, _} =
           lists:foldl(fun(Server, {PoolAcc, ServerAcc, Inc}) ->
  -            {port, Port} = lists:keyfind(port, 1, Server),
  -            {listen, IPList0} = lists:keyfind(listen, 1, Server),
  -            IPList = normalize_addresses(IPList0),
  -            {protocol, Proto} = lists:keyfind(protocol, 1, Server),
  -            {worker_pool, Pool} = lists:keyfind(worker_pool, 1, Server),
  -            PoolName = list_to_atom("erldns_tcp_worker_pool_" ++ integer_to_list(Inc)),
  -            NewPools = [lists:append([{name, PoolName}], Pool) | PoolAcc],
  -            {NewPools, parse_server(IPList, Proto, Port, PoolName, ServerAcc), Inc + 1}
  -        end, {[], [], 0}, ServerList),
  +                            {port, Port} = lists:keyfind(port, 1, Server),
  +                            {listen, IPList0} = lists:keyfind(listen, 1, Server),
  +                            IPList = normalize_addresses(IPList0),
  +                            {protocol, Proto} = lists:keyfind(protocol, 1, Server),
  +                            {worker_pool, Pool} = lists:keyfind(worker_pool, 1, Server),
  +                            PoolName = list_to_atom("erldns_tcp_worker_pool_" ++ integer_to_list(Inc)),
  +                            NewPools = [lists:append([{name, PoolName}], Pool) | PoolAcc],
  +                            {NewPools, parse_server(IPList, Proto, Port, PoolName, ServerAcc), Inc + 1}
  +                    end, {[], [], 0}, ServerList),
       {Pools, Servers}.
   
   %% @doc This function folds over a list of ip addresses (inet/inet6), if a address with all 0's
  
positive.code: 
  %% @doc This function takes several parameters and creates the config for the server.
  -spec parse_server([{inet:address_family(), inet:ip_address()}],[inet:socket_protocol()],
      inet:port_number(), atom(), term()) -> term().
  parse_server([], _ProtocolList, _Port, _PoolName, Acc) ->
      Acc;
  parse_server([{IPType, IPAddr} = _IP | Tail], ProtocolList, Port, PoolName, Acc0) ->
  
negative.code:     Acc;
  add_protocols([Proto | Tail], IPType, IPAddr, Port, PoolName, Acc0) ->
      add_protocols(Tail, IPType, IPAddr, Port, PoolName,
                    [{IPType, IPAddr, Proto, Port, PoolName} | Acc0]).
  
  get_address(inet) ->
      case application:get_env(erldns, inet4) of
          {ok, Address} -> parse(Address);
          _ -> [?DEFAULT_IPV4_ADDRESS]
      end;
  get_address(inet6) ->
      case application:get_env(erldns, inet6) of
          {ok, Address} -> parse(Address);
          _ -> [?DEFAULT_IPV6_ADDRESS]
      end.
  
  %% @doc The the port that the DNS server should listen on.
  %%
  %% Default: 53
  -spec get_port() -> inet:port_number().
  get_port() ->
      case application:get_env(erldns, port) of
          {ok, Port} -> Port;
          _ -> ?DEFAULT_PORT
      end.
  
  %% @doc Get the number of workers to run for handling DNS requests.
  %%
  %% Default: 10
  -spec get_num_workers() -> non_neg_integer().
  get_num_workers() ->
      case application:get_env(erldns, num_workers) of
          {ok, NumWorkers} -> NumWorkers;
          _ -> ?DEFAULT_NUM_WORKERS
      end.
  
  -spec use_root_hints() -> boolean().
  use_root_hints() ->
      case application:get_env(erldns, use_root_hints) of
          {ok, Flag} -> Flag;
          _ -> true
      end.
  
  %% Private functions
  parse(IPList) ->
      parse(IPList, []).
  
  