[svn:qpsmtpd] r714 - trunk/plugins
[email protected] Tue, 13 Feb 2007 10:29:48 -0800 (PST)
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
Author: msergeant
Date: Tue Feb 13 10:29:47 2007
New Revision: 714
Modified:
trunk/plugins/spamassassin
Log:
Quiet warnings (Steve_p)
Modified: trunk/plugins/spamassassin
==============================================================================
--- trunk/plugins/spamassassin (original)
+++ trunk/plugins/spamassassin Tue Feb 13 10:29:47 2007
@@ -102,7 +102,8 @@
my $remote = 'localhost';
my $port = 783;
- if ($self->{_args}->{spamd_socket} =~ /^([\w.-]+):(\d+)$/) {
+ if (defined $self->{_args}->{spamd_socket}
+ && $self->{_args}->{spamd_socket} =~ /^([\w.-]+):(\d+)$/) {
$remote = $1;
$port = $2;
}