keith/friendica
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Support for a new Diaspora command for post retraction

Browse source
This commit is contained in:
Michael Vogel 2015-12-03 08:35:47 +01:00
parent 4798675e6e
commit 24f1a24208
1 changed files with 17 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
include/diaspora.php
View file

@ -2254,8 +2254,23 @@ function diaspora_retraction($importer,$xml) {
if($type === 'Person') { if($type === 'Person') {
require_once('include/Contact.php'); require_once('include/Contact.php');
contact_remove($contact['id']); contact_remove($contact['id']);
} } elseif($type === 'StatusMessage') {
elseif($type === 'Post') { $guid = notags(unxmlify($xml->post_guid));
$r = q("SELECT * FROM `item` WHERE `guid` = '%s' AND `uid` = %d AND NOT `file` LIKE '%%[%%' LIMIT 1",
dbesc($guid),
intval($importer['uid'])
);
if(count($r)) {
if(link_compare($r[0]['author-link'],$contact['url'])) {
q("UPDATE `item` SET `deleted` = 1, `changed` = '%s' WHERE `id` = %d",
dbesc(datetime_convert()),
intval($r[0]['id'])
);
delete_thread($r[0]['id'], $r[0]['parent-uri']);
}
}
} elseif($type === 'Post') {
$r = q("select * from item where guid = '%s' and uid = %d and not file like '%%[%%' limit 1", $r = q("select * from item where guid = '%s' and uid = %d and not file like '%%[%%' limit 1",
dbesc('guid'), dbesc('guid'),
intval($importer['uid']) intval($importer['uid'])