X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=Net-Server-NNTP%2Flib%2FNet%2FServer%2FNNTP%2FPostgres.pm;h=5a7d541fa29cfb984cacaaf88e84130b23c22bb6;hb=5287daf6ddee09818fc8be2c1c3422ab769de020;hp=13e1850764f79d5ec3e9be19dbe97b12eaadaec7;hpb=d1578c89c1be4a044e63c3413bac3c14de66094b;p=newsd diff --git a/Net-Server-NNTP/lib/Net/Server/NNTP/Postgres.pm b/Net-Server-NNTP/lib/Net/Server/NNTP/Postgres.pm index 13e1850..5a7d541 100644 --- a/Net-Server-NNTP/lib/Net/Server/NNTP/Postgres.pm +++ b/Net-Server-NNTP/lib/Net/Server/NNTP/Postgres.pm @@ -417,12 +417,12 @@ sub log_stats { $s->commit; $s->rollback; - my $stats = $s->prepare(q{insert into sessions (peer, addr, port, connected, closed, received, refused, rejected, postponed) values (?,?,?,timestamp with time zone 'epoch' + ? * INTERVAL '1 second',timestamp with time zone 'epoch' + ? * INTERVAL '1 second',?,?,?,?)}); + my $stats = $s->prepare(q{insert into sessions (peer, addr, port, connected, closed, received, refused, rejected, postponed) values (?,?,?,timestamp with time zone 'epoch' + ? * INTERVAL '1 second',current_timestamp,?,?,?,?)}); $stats->execute($s->{nntp}{peername}, $s->{server}->{peeraddr}, $s->{server}->{peerport}, - $s->{nntp}{connecttime}, time, + $s->{nntp}{connecttime}, $rec, $ref, $rej, $postp); $s->commit; }