anchor.diff:        {add_rrs,
          [RR#dns_rr{
             bm = tolower(RR#dns_rr.domain), tm = TM, cnt = TM}
  -        || RR <- RRs]}).
  +        || #dns_rr{ttl = TTL} = RR <- RRs,
  +           %% Do not cache TTL 0 entries - they are only used
  +           %% to resolve the current lookup
  +           0 < TTL]}).
   
   %%
   %% getbyname (cache version)
  
positive.code: %%
  %% Look up all matching objects.  The still valid ones
  %% should be returned, and updated with a new cnt time.
  %% All expired ones should be deleted.  We count TTL 0
  %% RRs as valid but immediately expired.
  %%
  match_rr(MatchRR) ->
      CacheDb = inet_cache,
  
negative.code:     %%
      #dns_rr{ttl = TTL, tm = TM, cnt = Cnt} = RR,
      if
          TM + TTL < Time ->
              %% Expired, delete
              match_rr(
  