diff -r 88749a69668e -r d465c78373ca lib/Nagios/Check/DNS/delegation.pm --- a/lib/Nagios/Check/DNS/delegation.pm Mon Jan 19 12:01:39 2015 +0100 +++ b/lib/Nagios/Check/DNS/delegation.pm Mon Jan 19 12:02:05 2015 +0100 @@ -89,12 +89,9 @@ ### assert: @_ % 2 == 0 my %resflags = (nameservers => \@extns, @_); my $aa = delete $resflags{aa}; - my $override = delete $resflags{override}; my $nameservers = join ',' => @{$resflags{nameservers}}; my @ns; - return sort @{$override->{$domain}} if exists $override->{$domain}; - my $r = Net::DNS::Resolver->new(%resflags); my $q; @@ -141,7 +138,6 @@ my (@errs, @ns); # obtain an authoritive list of nameservers from the reference server - #my @our = eval { sort +ns($domain, nameservers => [$reference], aa => 1, override => $override) }; my @our = eval { sort +ns($domain, nameservers => $references, aa => 1) }; if (chomp $@) { push @errs, $@;