Changeset 778


Ignore:
Timestamp:
08/01/19 11:22:19 (5 years ago)
Author:
Kris Deugau
Message:

/trunk

Change up the SOA lookup in importAXFR() for compatibility with older Net::DNS versions

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/DNSDB.pm

    r776 r778  
    56605660    my $res = Net::DNS::Resolver->new;
    56615661    $res->nameservers($ifrom);
    5662     my ($origsoa) = rr($res, $zone, 'SOA');
    5663     my $ser = $origsoa->{serial};
     5662    my $soaq = $res->query($zone, "SOA");
     5663    die "Error retrieving SOA for $zone: ".$res->errorstring."\n" if !$soaq;
     5664    my $ser = ($soaq->answer)[0]->{serial}
    56645665    if ($args{rwsoa}) {
    56655666      if (!$args{keepserial}) {
Note: See TracChangeset for help on using the changeset viewer.