21 lines
349 B
PHP
21 lines
349 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) {
|
|
$link = Contact::magicLink($x);
|
|
$a->redirect($link);
|
|
}
|
|
|
|
$a->internalRedirect('profile');
|
|
}
|