|
Lines 113-119
if ($email) {
Link Here
|
| 113 |
|
113 |
|
| 114 |
# Analysing information and getting mail properties |
114 |
# Analysing information and getting mail properties |
| 115 |
if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) { |
115 |
if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) { |
| 116 |
$mail{'subject'} = Encode::encode("UTF-8", $1); |
116 |
$mail{'subject'} = encode('MIME-Header',$1); |
|
|
117 |
$mail{'subject'} = Encode::encode("UTF-8", $mail{'subject'}); |
| 117 |
$mail{subject} =~ s|\n?(.*)\n?|$1|; |
118 |
$mail{subject} =~ s|\n?(.*)\n?|$1|; |
| 118 |
} |
119 |
} |
| 119 |
else { $mail{'subject'} = "no subject"; } |
120 |
else { $mail{'subject'} = "no subject"; } |
| 120 |
- |
|
|