Only suggest friendica contacts that where recently active

diff --git a/include/Contact.php b/include/Contact.php
index 103dbe9addf31df4adc1496edca59bd6995d762f..1215f40e75e35b9e1c825873ea864b5422f50816 100644 (file)
--- a/include/Contact.php
+++ b/include/Contact.php
@@ -267,7 +267,12 @@ function contact_photo_menu($contact) {
 
 
 function random_profile() {
-       $r = q("select url from gcontact where url like '%%://%%/profile/%%' order by rand() limit 1");
+       $r = q("SELECT `url` FROM `gcontact` WHERE `network` = '%s'
+                               AND `last_contact` >= `last_failure`
+                               AND `updated` > UTC_TIMESTAMP - INTERVAL 1 MONTH
+                       ORDER BY rand() LIMIT 1",
+               dbesc(NETWORK_DFRN));
+
        if(count($r))
                return dirname($r[0]['url']);
        return '';

diff --git a/include/socgraph.php b/include/socgraph.php
index 618a9bf3ea1975f83a0e75c5dec82b4bc320df02..872b730e059ad316c6a708d0547f0b043cf7eef5 100644 (file)
--- a/include/socgraph.php
+++ b/include/socgraph.php
@@ -1211,7 +1211,7 @@ function poco_discover($complete = false) {
        $last_update = date("c", time() - (60 * 60 * 6)); // 24
        $last_update = date("c", time() - (60 * 60 * 24)); // 24
 
-       $r = q("SELECT `poco`, `nurl`, `url`, `network` FROM `gserver` WHERE `last_contact` > `last_failure` AND `poco` != '' AND `last_poco_query` < '%s' ORDER BY RAND()", dbesc($last_update));
+       $r = q("SELECT `poco`, `nurl`, `url`, `network` FROM `gserver` WHERE `last_contact` >= `last_failure` AND `poco` != '' AND `last_poco_query` < '%s' ORDER BY RAND()", dbesc($last_update));
        if ($r)
                foreach ($r AS $server) {