koozali
/
smeserver-qpsmtpd-log2sql
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Décode le sujet des mails

This commit is contained in:
Daniel Berteaud 2012-10-12 16:10:55 +02:00
parent 84c162873b
commit 4c6a38ccde
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
root/usr/share/qpsmtpd/plugins/logging/log2sql
View File

@ -10,6 +10,7 @@
#####################################################
use DBI;
use Encode qw(decode);
use strict;
#plugin level variables are here since version 0.02
@ -132,7 +133,7 @@ sub data_post_handler{
#'touch' this message :-))
$header->add("X-Sql-Log-ID",$mail_id);
my $subject = scalar $header->get("Subject");
my $subject = decode('MIME-Header', scalar $header->get("Subject"));
chomp($subject);
# Only keep the first 255 chars to be sure it can be inserted in the table
$subject= substr $subject, 0, 254 if (length($subject) > 254);