Bug 21874: (QA follow-up) Fix intranet sendshelf
Move encode line below regex line. Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
parent
e40bb00ab8
commit
c1ec452e5c
|
|
@ -113,10 +113,11 @@ if ($email) {
|
|||
|
||||
# Analysing information and getting mail properties
|
||||
if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
|
||||
$mail{'subject'} = encode('MIME-Header', $1);
|
||||
$mail{subject} = $1;
|
||||
$mail{subject} =~ s|\n?(.*)\n?|$1|;
|
||||
}
|
||||
else { $mail{'subject'} = "no subject"; }
|
||||
$mail{subject} = encode( 'MIME-Header', $mail{subject} );
|
||||
|
||||
my $email_header = "";
|
||||
if ( $template_res =~ /<HEADER>(.*)<END_HEADER>/s ) {
|
||||
|
|
|
|||
Loading…
Reference in New Issue