-
-$nurl = normalise_link($argv[1]);
-$r = dba::select("contact", array("id"), array("nurl" => $nurl, "uid" => 0), array("limit"=> 1));
-if (DBM::is_result($r)) {
- dba::update("contact", array("hidden"=>1), array("id"=>$r["id"]));
+$net = Probe::uri($argv[1]);
+if (in_array($net['network'], [NETWORK_PHANTOM, NETWORK_MAIL])) {
+ echo "This account seems not to exist.";
+ echo "\r\n";
+ exit(1);
+}
+$nurl = normalise_link($net['url']);
+$contact = dba::selectFirst("contact", ["id"], ["nurl" => $nurl, "uid" => 0]);
+if (DBM::is_result($contact)) {
+ dba::update("contact", ["hidden" => true], ["id" => $contact["id"]]);