Archived
1
0
Fork 0

Add sendmail option

This commit is contained in:
Mercier Pierre-Olivier 2013-11-14 16:20:13 +01:00
commit 5247d4db53
2 changed files with 10 additions and 5 deletions

View file

@ -71,7 +71,8 @@ sub log
if ($mail_error && $level <= ERROR)
{
require Email::Sender::Simple qw(sendmail);
require Email::Sender::Simple;
Email::Sender::Simple->import(qw(sendmail));
my $mail = Email::MIME->create(
header_str => [
From => "Roots assistants <root\@$HOSTNAME.acu.epita.fr>",