thh/newsstats
1
0
Fork 0
Code Issues 3 Pull requests Projects Releases Packages Activity

gatherstats: Don't' overwrite User-Agent with X-Newsreader.

Browse source 
Signed-off-by: Thomas Hochstein <thh@thh.name>
This commit is contained in:
Thomas Hochstein 2026-01-17 03:01:54 +01:00
parent deb812da58
commit f3b184f2e3
2 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
bin/gatherstats.pl
View file

@ -411,8 +411,8 @@ sub ClientStats {
# parse header
# User-Agent style
if ($Header{'x-newsreader'} =~ /^([^\/ ]+\/[^\/ ]+ ?)+$/) {
# transfer to user-agent and parse from there
$Header{'user-agent'} = $Header{'x-newsreader'};
# transfer to user-agent, if not set, and parse from there
$Header{'user-agent'} = $Header{'x-newsreader'} if !$Header{'user-agent'};
# "client name version"
} elsif ($Header{'x-newsreader'} =~ / /) {
($Client, $Version) = ParseXNewsreader($Header{'x-newsreader'});
@ -428,7 +428,7 @@ sub ClientStats {
version => $Version);
push @Clients, { %UserAgent };
} else {
$Header{'user-agent'} = $Header{'x-newsreader'};
$Header{'user-agent'} = $Header{'x-newsreader'} if !$Header{'user-agent'};
}
}
### User-Agent

1
doc/ChangeLog
View file

@ -6,6 +6,7 @@ NewsStats 0.5.0 (unreleased)
* Rename postingstats.pl to poststats.pl, rename
dopostingstats.sh accordingly, fix all references.
* Fix missing variable initialisation in FormatOutput().
* gatherstats: Don't' overwrite User-Agent with X-Newsreader.
NewsStats 0.4.0 (2025-06-02)
* Reformat $Conf{TLH} for GroupStats only.