X-Git-Url: https://code.th-h.de/?p=usenet%2Fyapfaq.git;a=blobdiff_plain;f=yapfaq.pl;h=6e3032c353b17fc79c1aca79943c1a0265faf29d;hp=00ecbc6ab6c2a4ba49415f5fbcad933e0ac116f1;hb=b16eb1aec41bc80a9f09f63fdd217433145632dc;hpb=994d97596958105f103c12c8efb10431e17887c9 diff --git a/yapfaq.pl b/yapfaq.pl index 00ecbc6..6e3032c 100644 --- a/yapfaq.pl +++ b/yapfaq.pl @@ -12,7 +12,7 @@ # It can be redistributed and/or modified under the same terms under # which Perl itself is published. -our $VERSION = "0.8.1"; +our $VERSION = "0.9-prelease"; # Please do not change this setting! # You may override the default .rc file (.yapfaqrc) by using "-c .rc file" @@ -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;