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