20 lines
340 B
PHP
20 lines
340 B
PHP
<?php
|
|
/**
|
|
* @file mod/randprof.php
|
|
*/
|
|
use Friendica\App;
|
|
use Friendica\Core\System;
|
|
use Friendica\Model\Contact;
|
|
use Friendica\Model\GContact;
|
|
use Friendica\Model\Profile;
|
|
|
|
function randprof_init(App $a)
|
|
{
|
|
$x = GContact::getRandomUrl();
|
|
|
|
if ($x) {
|
|
$a->internalRedirect(Contact::magicLink($x));
|
|
}
|
|
|
|
$a->internalRedirect('profile');
|
|
}
|