diff options
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/lib/Mail/Rspamd/Client.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/lib/Mail/Rspamd/Client.pm b/perl/lib/Mail/Rspamd/Client.pm index ee07e446b..94e26a093 100644 --- a/perl/lib/Mail/Rspamd/Client.pm +++ b/perl/lib/Mail/Rspamd/Client.pm @@ -965,7 +965,7 @@ sub _do_control_command { if ($self->_auth ($remote)) { my $len = length ($msg); - syswrite $remote, "learn $self->{statfile} $len -w $self->{weight}" . $EOL; + syswrite $remote, "learn $self->{statfile} $len -m $self->{weight}" . $EOL; syswrite $remote, $msg . $EOL; unless ($self->_get_io_readiness($remote, 0)) { $res{error} = "Timeout while reading data from socket"; |