anchor.diff:    {reply, ok, State}.
   
   handle_cast({delete, Name}, State) ->
  -  erldns_storage:delete(zones, normalize_name(Name)),
  +  erldns_storage:delete(zones, erldns:normalize_name(Name)),
     {noreply, State};
   
   handle_cast(Message, State) ->
  
positive.code: get_records_by_name(Name) ->
    case find_zone_in_cache(Name) of
      {ok, Zone} ->
        case dict:find(normalize_name(Name), Zone#zone.records_by_name) of
          {ok, RecordSet} -> RecordSet;
          _ -> []
        end;
  
negative.code: find_zone(Qname, Authorities) when is_list(Authorities) ->
    find_zone(Qname, lists:last(Authorities));
  find_zone(Qname, Authority) when is_record(Authority, dns_rr) ->
    Name = erldns:normalize_name(Qname),
    case dns:dname_to_labels(Name) of
      [] -> {error, zone_not_found};
      [_|Labels] ->
  