aboutsummaryrefslogtreecommitdiffstats
path: root/perl
diff options
context:
space:
mode:
authorcebka@lenovo-laptop <cebka@lenovo-laptop>2010-03-17 17:24:35 +0300
committercebka@lenovo-laptop <cebka@lenovo-laptop>2010-03-17 17:24:35 +0300
commit80e0a6ac5f69911be278c7d1ae67c8027e903e5b (patch)
tree6b4e158e08f27d163c7ec17989f7aca1594d13ea /perl
parent8ff54fd778dbbdf807312fb563c2c440a5101a2c (diff)
downloadrspamd-80e0a6ac5f69911be278c7d1ae67c8027e903e5b.tar.gz
rspamd-80e0a6ac5f69911be278c7d1ae67c8027e903e5b.zip
* Fix statistics of messages in controller
* Fix building and installing perl target * Fix learn command name * Controller's commands are now case insensitive * Statfiles can now be selected from popup list in cgi interface * Password for controller's commands can now be specified in cgi interface
Diffstat (limited to 'perl')
-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 100bfad68..d5b630118 100644
--- a/perl/lib/Mail/Rspamd/Client.pm
+++ b/perl/lib/Mail/Rspamd/Client.pm
@@ -394,7 +394,7 @@ This method makes a call to the spamd learning a statfile with message.
sub learn {
my ($self, $msg) = @_;
- $self->{command} = 'LEARN';
+ $self->{command} = 'learn';
$self->{control} = 1;
return $self->do_all_cmd ($msg);