X-Git-Url: https://pd.if.org/git/?p=newsd;a=blobdiff_plain;f=Net-Server-NNTP%2Flib%2FNet%2FServer%2FNNTP%2FPostgres.pm;h=5a7d541fa29cfb984cacaaf88e84130b23c22bb6;hp=13e1850764f79d5ec3e9be19dbe97b12eaadaec7;hb=HEAD;hpb=2ba50fd7ee12d66739b31513009e921fe2f0b8b1 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; }