summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLibravatar William Heimbigner <william.heimbigner@gmail.com>2016-02-21 01:47:19 -0700
committerLibravatar William Heimbigner <william.heimbigner@gmail.com>2016-02-21 01:47:19 -0700
commit6f0f5a7f1ad7409c92b36feeaa543457fc321f83 (patch)
treea06ee0d8edfdf667b66d18bbfdeb8b028d808844
parentd7ea76e9fcf7ce323542e7d19c19426293dfbb4a (diff)
downloadantispammeta-6f0f5a7f1ad7409c92b36feeaa543457fc321f83.tar.bz2
antispammeta-6f0f5a7f1ad7409c92b36feeaa543457fc321f83.tar.xz
antispammeta-6f0f5a7f1ad7409c92b36feeaa543457fc321f83.tar.zst
Clean up some warnings being generated for unknown reasons pertaining to DNS issues
-rw-r--r--lib/ASM/Util.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/ASM/Util.pm b/lib/ASM/Util.pm
index 4b0137d..8e3fe8c 100644
--- a/lib/ASM/Util.pm
+++ b/lib/ASM/Util.pm
@@ -267,7 +267,9 @@ sub stripResp
return undef;
}
my @answer = $response->answer;
- if ($response->{header}->{rcode} ne "NOERROR") {
+ if ((!defined($response->{header})) ||
+ (!defined($response->{header}->{rcode})) ||
+ ($response->{header}->{rcode} ne "NOERROR")) {
dprint($module, Dumper($response), 'dns');
return undef;
}