MailScanner/v5
1
1
Fork 0
mirror of https://github.com/MailScanner/v5.git synced 2024-09-20 15:26:08 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix Header Add (#249)

Browse source
This commit is contained in:
Shawn Iverson 2018-10-13 14:35:02 -04:00 committed by GitHub
parent e67f8a7c0f
commit f1da71c91c
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
common/usr/share/MailScanner/perl/MailScanner/MSMail.pm
View file

@ -611,6 +611,7 @@ sub new {
} }
} else { } else {
$pos = $#{$message->{metadata}}; $pos = $#{$message->{metadata}};
$pos++;
} }
# Need to split the new header data into the 1st line and a list of # Need to split the new header data into the 1st line and a list of
@ -721,6 +722,7 @@ sub new {
$oldlocation++; $oldlocation++;
} while($linenum<$totallines && } while($linenum<$totallines &&
$message->{metadata}[$oldlocation] =~ /^H\s/); $message->{metadata}[$oldlocation] =~ /^H\s/);
$oldlocation--;
my(@lines, $line, $firstline); my(@lines, $line, $firstline);
@lines = split(/\n/, $newvalue); @lines = split(/\n/, $newvalue);