anchor.diff:                      handle_unknown_subdomain(DomainNotNormalized, Prefix, DNSZone);
                   IPAddrList ->
                       {ok,
  -                            [dns_server:answer_record(DomainNotNormalized, TTL, a, IPAddress) || IPAddress <- IPAddrList] ++
  +                            [dns_server:answer_record(DomainNotNormalized, TTL, ?S_A, IPAddress) || IPAddress <- IPAddrList] ++
                               [dns_server:authoritative_answer_flag(true)]
                       }
               end
  
positive.code:             case Domain of
                  CName ->
                      {ok,
                              [dns_server:answer_record(DomainNotNormalized, TTLSOA, soa, Authority)] ++
                              [dns_server:authority_record(DomainNotNormalized, TTLNS, ns, NSHostname) || NSHostname <- NSServers] ++
                              lists:flatten([begin
                                                 IPAddrList = proplists:get_value(NSHostname, IPAddresses, []),
                                                 [dns_server:additional_record(NSHostname, TTLA, a, IPAddress) || IPAddress <- IPAddrList]
                                             end || NSHostname <- NSServers]) ++
                              [dns_server:authoritative_answer_flag(true)]
                      };
  
negative.code:                             provider_logic:get_default_provider_for_user(UserID),
                          ok = user_logic:modify(UserID, [{default_provider, NewDefProv}]),
                          {ok, Data2} = provider_logic:get_data(NewDefProv),
                          Data2\
                      end,
                  GRDomain = get_canonical_hostname(),
                  RedPoint = binary_to_list(proplists:get_value(redirectionPoint, DataProplist)),
  