Compare commits

..

No commits in common. "66435ceda0749847af9da16ed3df5cbf79936790" and "67182bc6430675a234093d1f49bb969f160537d8" have entirely different histories.

2 changed files with 4 additions and 38 deletions

View file

@ -2,11 +2,6 @@ yapfaq 1.1.0 (unreleased)
* --test: Set Supersedes and don't modify Message-ID if -o is set.
* --test: Force -o if -n is not set.
* Add conversion script for old status files.
* Accept a posting-frequency of "never", too.
* Check for illegal headers and stop posting, if found.
* Disabled projects must be posted, if forced.
* Warn of unencoded 8bit characters in header or body if -d is set.
* Update POD.
yapfaq 1.0.1 (2025-01-24)
* Add %t placeholder for Message-ID (feature parity with 0.9).

View file

@ -412,17 +412,6 @@ sub BuildPosting {
return '';
}
# check for illegal headers
my $FoundIllegalHeader = 0;
foreach (qw/Date User-Agent X-Newsreader X-Mailer Injection-Date
Injection-Info NNTP-Posting-Date NNTP-Posting-Host X-Trace/) {
if ($Header{lc($_)}) {
warn "W: $_ header may not be set in '$HeaderFile'.\n";
$FoundIllegalHeader = 1;
}
}
return '' if $FoundIllegalHeader;
# add Date:
push @Headers, 'Date: ' . $TD->strftime('%a, %d %b %Y %H:%M:%S %z') . "\n";
# add missing Message-ID:
@ -430,16 +419,6 @@ sub BuildPosting {
# add User-Agent
push @Headers, "User-Agent: $NAME/$VERSION\n";
# check for unencoded 8bit characters in header or body in --debug mode
# taken from tinews.pl
if ($Config{'debug'}) {
print "- Raw 8-bit data in headers.\n" if (grep {/[\x80-\xff]/} @Headers);
# check for MIME headers and warn for 8bit characters in body if missing
if (!defined($Header{'mime-version'}) || !defined($Header{'content-type'})) {
print "- 8bit data in body without MIME-headers.\n" if (grep {/[\x80-\xff]/} @Body);
}
}
# parse pseudo headers from body
my ($InRealBody,$LastModified,$PostingFrequency);
foreach (@Body) {
@ -536,8 +515,8 @@ sub BuildPosting {
}
}
# not due if Posting-Freqency is "none" or never
if ($PostingFrequency =~ /none|never/ && !$OptForce) {
# not due if Posting-Freqency is "none"
if ($PostingFrequency =~ /none/) {
print "... is disabled.\n" if $Config{'verbose'} or $Config{'debug'};
return '';
}
@ -761,14 +740,7 @@ files need to be in B<datadir>.
Needs to have at least I<From:>, I<Subject:> and I<Newsgroups:> and
can contain all other headers that the posting should have. Headers
must conform to RFC 5536 and RFC 5322 and use MIME encoded words for
8bit characters. B<yapfaq> won't convert headers, but will warn of
unencoded 8bit characters in B<--debug> mode. Longer headers should
be folded; B<yapfaq> won't fold headers.
The headers file must not contain any of the following headers:
I<Date:>, I<User-Agent:>, I<X-Newsreader:>, I<X-Mailer:>,
I<Injection-Date:>, I<Injection-Info:>, I<NNTP-Posting-Date:>,
I<NNTP-Posting-Host:> or I<X-Trace:>.
8bit characters. B<yapfaq> won't convert headers.
I<Subject:> may contain a I<%LM> placeholder that will be replaced
with the I<Last-modified:> pseudo-header from the text file
@ -830,8 +802,7 @@ I<Last-modified:> and I<Posting-frequency> will be evaluated by
B<yapfaq>.
If your content contains 8bit characters, you'll need suitable MIME
headers in your headers file. B<yapfaq> will warn of unencoded 8bit
characters with missung MIME headers in B<--debug> mode.
headers in your headers file.
B<Example text file with pseudo-headers>