anchor.diff:  -module(erldns_SUITE).
   %% API
   -export([all/0,
  -    init_per_suite/1,
  -    end_per_suite/1,
  -    init_per_testcase/2]).
  +         init_per_suite/1,
  +         end_per_suite/1,
  +         init_per_testcase/2]).
   
   -export([mnesia_API_test/1,
            json_API_test/1,
  
positive.code:     ok = erldns_storage:insert(zones, ZONE5),
      %%Iterate through table and see all the entrys.
      Iterator =  fun(Rec,_)->
          io:format("~p~n",[Rec]),
          []
      end,
      erldns_storage:foldl(Iterator, [], zones),
      erldns_storage:select(zones, <<"TEST NAME 1">>),
      ok = erldns_storage:delete(zones, <<"TEST NAME 1">>),
  
negative.code: server_children_test(_Config) ->
      {ok, IFAddrs} = inet:getifaddrs(),
      Config = lists:foldl(fun(IFList, Acc) ->
                                   {_, List} = IFList,
                                   [List | Acc]
                           end, [], IFAddrs),
      AddressesWithPorts = lists:foldl(fun(Conf, Acc) ->
                                               {addr, Addr} = lists:keyfind(addr, 1, Conf),
                                               [{Addr, 8053} | Acc]
                                       end, [], Config),
      Addresses = lists:foldr(fun({Addr, _Port} = _Element, Acc) ->
                                      [Addr| Acc]
                              end, [], AddressesWithPorts),
      io:format("AddressPort: ~p~n", [AddressesWithPorts]),
      io:format("Address: ~p~n", [Addresses]),
      ok = application:set_env(erldns, servers, [
                                                 [{port, 8053},
                                                  {listen, Addresses},
                                                  {protocol, [tcp, udp]},
                                                  {worker_pool, [
                                                                 {size, 10}, {max_overflow, 20}
                                                                ]}]
                                                ]),
      ok = application:set_env(erldns, storage, [{type, erldns_storage_mnesia}, {dir, "db"}]),
      erldns_storage_mnesia = erldns_config:storage_type(),
      ok = erldns:start(),
  