blob: 620fd9170034e72a9295979a3df12ad624973b0f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
$NetBSD: patch-sa-update,v 1.1.2.2 2013/08/01 12:51:54 tron Exp $
from https://issues.apache.org/SpamAssassin/show_bug.cgi?id=6872,
fix for new Net::DNS
Index: sa-update.raw
===================================================================
--- sa-update.raw (revision 1421187)
+++ sa-update (working copy)
@@ -1136,9 +1136,11 @@
if ($RR) {
foreach my $rr ($RR->answer) {
my $text = $rr->rdatastr;
- local($1);
- $text =~ /^"(.*)"$/;
- push @result, $1;
+ if (defined $text && $text ne '') {
+ local($1);
+ $text =~ s/^"(.*)"\z/$1/s;
+ push(@result,$text);
+ }
}
}
else {
|
