+ if(($a->argc > 2) && ($a->argv[1] == "drop") && intval($a->argv[2])) {
+ $r = q("SELECT * FROM `profile` WHERE `id` = %d AND `uid` = %d AND `is-default` = 0 LIMIT 1",
+ intval($a->argv[2]),
+ intval($_SESSION['uid'])
+ );
+ if(! count($r)) {
+ $_SESSION['sysmsg'] .= "Profile not found." . EOL;
+ goaway($a->get_baseurl() . '/profiles');
+ return; // NOTREACHED
+ }
+
+ // move every contact using this profile as their default to the user default
+
+ $r = q("UPDATE `contact` SET `profile-id` = (SELECT `profile`.`id` AS `profile-id` FROM `profile` WHERE `profile`.`is-default` = 1 AND `profile`.`uid` = %d LIMIT 1) WHERE `profile-id` = %d AND `uid` = %d ",
+ intval($_SESSION['uid']),
+ intval($a->argv[2]),
+ intval($_SESSION['uid'])
+ );
+ $r = q("DELETE FROM `profile` WHERE `id` = %d LIMIT 1",
+ intval($a->argv[2])
+ );
+ if($r)
+ notice("Profile deleted." . EOL);
+
+ goaway($a->get_baseurl() . '/profiles');
+ return; // NOTREACHED
+ }
+
+
+
+
+