blob: f51ac63f75e5b1b50bdca7c416b8e37863586c51 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
$NetBSD: patch-ag,v 1.3 2003/02/02 19:38:40 heinz Exp $
--- lib/Mail/SpamAssassin/Dns.pm.orig Wed Nov 27 17:45:19 2002
+++ lib/Mail/SpamAssassin/Dns.pm
@@ -390,6 +390,12 @@
my $objects = $rc->prepare_objects( \@msg )
or die "error in prepare_objects";
$rc->get_server_info() or die $rc->errprefix("checkit");
+
+ # let's reset the alarm since get_server_info() calls
+ # nextserver() which calls discover() which very likely will
+ # reset the alarm for us ... how polite. :(
+ alarm $timeout;
+
my $sigs = $rc->compute_sigs($objects)
or die "error in compute_sigs";
|