aboutsummaryrefslogtreecommitdiffstats
path: root/perl/lib
diff options
context:
space:
mode:
authorVsevolod Stakhov <vsevolod@rambler-co.ru>2009-11-22 20:45:22 +0300
committerVsevolod Stakhov <vsevolod@rambler-co.ru>2009-11-22 20:45:22 +0300
commitb1e659182cd2eba38ab9de72f47a5ae88d36cd28 (patch)
tree25de514a919b5293ef998640f9e9c641a361412b /perl/lib
parent76e9c1e434a2d85791947b4c28d09e2c56330217 (diff)
downloadrspamd-b1e659182cd2eba38ab9de72f47a5ae88d36cd28.tar.gz
rspamd-b1e659182cd2eba38ab9de72f47a5ae88d36cd28.zip
* Add check_smtp_data function for checking some fields from SMTP dialog
Diffstat (limited to 'perl/lib')
-rw-r--r--perl/lib/Mail/Rspamd/Client.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/lib/Mail/Rspamd/Client.pm b/perl/lib/Mail/Rspamd/Client.pm
index 6026cc448..fa42bd5a3 100644
--- a/perl/lib/Mail/Rspamd/Client.pm
+++ b/perl/lib/Mail/Rspamd/Client.pm
@@ -154,7 +154,7 @@ sub check {
return undef unless $self->_get_io_readiness($remote, 0);
my $in, $res, $offset = 0;
- do {
+ do {
$res = sysread($remote, $in, 512, $offset);
if ($res > 0 && $res < 512) {
$self->_get_io_readiness($remote, 0);