Keep potentially online users for up to two days
authorJoey Schulze <joey@infodrom.org>
Wed, 2 Jul 2008 13:48:52 +0000 (13:48 +0000)
committerJoey Schulze <joey@infodrom.org>
Wed, 2 Jul 2008 13:48:52 +0000 (13:48 +0000)
bin/zeitungen-tidy

index a751357..aed6ae3 100755 (executable)
@@ -28,7 +28,7 @@ my $dbh = DBI->connect('dbi:Pg:dbname=zlist') or die "Can't connect to database\
 
 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";