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