notice(t('Error! Cannot check nickname'));\r
return;\r
}\r
- if (count($r) > 0) {\r
+ if (dbm::is_result($r) > 0) {\r
notice(sprintf(t("User '%s' already exists on this server!"), $account['user']['nickname']));\r
return;\r
}\r
notice(t('Error! Cannot check nickname'));\r
return;\r
}\r
- if (count($r) > 0) {\r
+ if (dbm::is_result($r) > 0) {\r
notice(sprintf(t("User '%s' already exists on this server!"), $account['user']['nickname']));\r
return;\r
}\r
$newuid = last_insert_id();\r
//~ $newuid = 1;\r
\r
-\r
+ // Generate a new guid for the account. Otherwise there will be problems with diaspora\r
+ q("UPDATE `user` SET `guid` = '%s' WHERE `uid` = %d",\r
+ dbesc(generate_user_guid()), intval($newuid));\r
\r
foreach ($account['profile'] as &$profile) {\r
foreach ($profile as $k => &$v) {\r
// send relocate message (below)\r
break;\r
case NETWORK_ZOT:\r
- // TODO handle zot network\r
+ /// @TODO handle zot network\r
break;\r
case NETWORK_MAIL2:\r
- // TODO ?\r
+ /// @TODO ?\r
break;\r
case NETWORK_FEED:\r
case NETWORK_MAIL:\r
}\r
\r
// send relocate messages\r
- proc_run('php', 'include/notifier.php', 'relocate', $newuid);\r
+ proc_run(PRIORITY_HIGH, 'include/notifier.php', 'relocate', $newuid);\r
\r
info(t("Done. You can now login with your username and password"));\r
goaway($a->get_baseurl() . "/login");\r