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

Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2010-05-15 16:32:58 +02:00
parent dc66bfa3f5
commit b16eb1aec4

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;