clean up sent messages some
This commit is contained in:
parent
baa228737d
commit
7aa9c59af8
2 changed files with 2 additions and 2 deletions
|
|
@ -118,7 +118,7 @@ sub create {
|
|||
$pref .= $session->db->quickScalar("SELECT username FROM users WHERE userid = ?",[$properties->{sentBy}]). ".";
|
||||
my $msg = (defined $properties->{emailMessage}) ? $properties->{emailMessage} : $self->{_properties}{message};
|
||||
if ($msg =~ m/\<.*\>/) {
|
||||
$mail->addHtml("<p>$pref</p><br>".$msg);
|
||||
$mail->addHtml("<p>$pref</p><br />".$msg);
|
||||
} else {
|
||||
$mail->addText($pref."\n\n".$msg);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -286,7 +286,7 @@ sub create {
|
|||
}
|
||||
}
|
||||
}
|
||||
my $from = $headers->{from} || $session->user->username." <".$session->setting->get("companyEmail").">";
|
||||
my $from = $headers->{from} || $session->setting->get('comanyName') . " <".$session->setting->get("companyEmail").">";
|
||||
my $type = $headers->{contentType} || "multipart/mixed";
|
||||
my $replyTo = $headers->{replyTo} || $session->setting->get("mailReturnPath");
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue