sub tidy_online
{
- my $query = q{SELECT uid FROM online WHERE activity < now() - interval'12 hours'};
+ my $query = q{SELECT uid FROM online WHERE activity < now() - interval'48 hours'};
my $sth = $dbh->prepare ($query) or die "Can't prepare Query: $DBI::errstr\n";
my $rv = $sth->execute or die "Can't execute query: $DBI::errstr\n";