Add sendmail option
This commit is contained in:
parent
947aebd490
commit
5247d4db53
2 changed files with 10 additions and 5 deletions
|
|
@ -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>",
|
||||
|
|
|
|||
Reference in a new issue