Fix: Accept case-insensitive Last-modified pseudo header.
Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
parent
15dd764aad
commit
8e1cb154c3
1 changed files with 1 additions and 1 deletions
|
|
@ -161,7 +161,7 @@ sub postfaq {
|
|||
s/\r//;
|
||||
push (@Body, $_), next if $InRealBody;
|
||||
$InRealBody++ if /^$/;
|
||||
$LastModified = $1 if /^Last-modified: (\S+)$/;
|
||||
$LastModified = $1 if /^Last-modified: (\S+)$/i;
|
||||
push @Body, $_;
|
||||
}
|
||||
close FH;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue