MailScanner/v5
1
1
Fork 0
mirror of https://github.com/MailScanner/v5.git synced 2024-11-10 17:35:06 +08:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix for https://github.com/MailScanner/v5/issues/43.

Browse source
This commit is contained in:
Mark Sapiro 2017-03-07 16:23:42 -08:00
parent 8ad3b65283
commit 40ac7a20e6
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
common/usr/share/MailScanner/perl/MailScanner/Message.pm
View file

@ -4597,7 +4597,11 @@ sub SignWarningMessage {
$warning = $this->ReadVirusWarning('inlinehtmlwarning');
#$warning = quotemeta $warning; # Must leave HTML tags alone!
foreach $line (@body) {
$line =~ s/\<html\>/$&$warning/i;
# html tags can have extra attributes. In a case where the <html> tag
# has attributes and is closed on a subsequent line, the warning will
# actually be in the tag, but it's malformed in any case because it
# precedes any <head> and <body> tags and clients seem to render it OK.
$line =~ s/\<html( [^>]*)?(\>|$)/$&$warning/i;
$io->print($line);
}
} else {