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:
parent
994d975969
commit
2ae816cb55
1 changed files with 1 additions and 1 deletions
|
|
@ -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;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue