Fix: Accept leading/trailing whitespace for Last-modified pseudo header.

Fixes #5.

Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2010-05-15 16:53:48 +02:00
parent 994d975969
commit 2ae816cb55

View file

@ -263,7 +263,7 @@ sub postfaq {
s/\r//;
push (@Body, $_), next if $InRealBody;
$InRealBody++ if /^$/;
$LastModified = $1 if /^Last-modified: (\S+)$/i;
$LastModified = $1 if /^Last-modified:\s*(\S+)\s*$/i;
push @Body, $_;
}
close FH;