X-Git-Url: https://code.th-h.de/?p=usenet%2Fyapfaq.git;a=blobdiff_plain;f=yapfaq.pl;h=5bc79191b4f8941ec1a1ba54fcc04bbf0907ffd4;hp=a229e39549f38a3326932ab875bda0080635c39a;hb=0b68926d7c23ec18aa9ed3df177c6e85abce8eb0;hpb=f5a291096e2ec3940cebe9a2952c1b888e45e43c;ds=sidebyside diff --git a/yapfaq.pl b/yapfaq.pl index a229e39..5bc7919 100644 --- a/yapfaq.pl +++ b/yapfaq.pl @@ -1,6 +1,6 @@ #! /usr/bin/perl -W # -# yapfaq Version 0.8.1 by Thomas Hochstein +# yapfaq Version 0.91 by Thomas Hochstein # (Original author: Marc Brockschmidt) # # This script posts any project described in its config-file. Most people @@ -12,7 +12,7 @@ # It can be redistributed and/or modified under the same terms under # which Perl itself is published. -our $VERSION = "0.9-prelease"; +our $VERSION = "0.91"; # Please do not change this setting! # You may override the default .rc file (.yapfaqrc) by using "-c .rc file" @@ -300,7 +300,8 @@ sub postfaq { $$NG = $Options{'t'}; $MID =~ s/@/-$Timestamp-test@/g; $$ExtraHeaders .= "\n" if $$ExtraHeaders; - $$ExtraHeaders .= "X-Supersedes: $$Supersedes\nX-yapfaq-Remark: This is only a test message."; + $$ExtraHeaders .= "X-Supersedes: $$Supersedes\n" if $$Supersedes; + $$ExtraHeaders .= "X-yapfaq-Remark: This is only a test message."; undef $$Supersedes; }