From: Thomas Hochstein <thh@inter.net>
Date: Sat, 15 May 2010 14:53:48 +0000 (+0200)
Subject: Fix: Accept leading/trailing whitespace for Last-modified pseudo header.
X-Git-Tag: v0.8.2~1
X-Git-Url: https://code.th-h.de/?p=usenet%2Fyapfaq.git;a=commitdiff_plain;h=2ae816cb5527e8bd52d072d80cf5fd6c0c8a475e

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

Fixes #5.

Signed-off-by: Thomas Hochstein <thh@inter.net>
---

diff --git a/yapfaq.pl b/yapfaq.pl
index 00ecbc6..dd1edfd 100644
--- a/yapfaq.pl
+++ b/yapfaq.pl
@@ -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;