forked from friendica/friendica-addons
		
	Update my URL in infiniteimprobabilitydrive so people can shout at the right person. Remove pokes from morechoice, and put them in their own addon. We'll leave the really "out there" ones away from the git. Group text, created by user request. Sets the group editor to text mode. This is possibly too 'special interest' for the git, but I'll let somebody else decide.
		
			
				
	
	
		
			49 lines
		
	
	
		
			No EOL
		
	
	
		
			1.3 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			49 lines
		
	
	
		
			No EOL
		
	
	
		
			1.3 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
<?php
 | 
						|
/**
 | 
						|
* Name: Infinite Improbability Drive
 | 
						|
* Description: Infinitely Improbably Find A Random User
 | 
						|
* Version: 1.0
 | 
						|
* Author: Thomas Willingham <https://kakste.com/profile/beardyunixer>
 | 
						|
*/
 | 
						|
 | 
						|
function infiniteimprobabilitydrive_install() {
 | 
						|
register_hook('app_menu', 'addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php', 'infiniteimprobabilitydrive_app_menu');
 | 
						|
}
 | 
						|
 | 
						|
function infiniteimprobabilitydrive_uninstall() {
 | 
						|
unregister_hook('app_menu', 'addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php', 'infiniteimprobabilitydrive_app_menu');
 | 
						|
 | 
						|
}
 | 
						|
 | 
						|
function infiniteimprobabilitydrive_app_menu($a,&$b) {
 | 
						|
$b['app_menu'][] = '<div class="app-title"><a href="infiniteimprobabilitydrive">' . t('Infinite Improbability Drive') . '</a></div>';
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
function infiniteimprobabilitydrive_module() {
 | 
						|
return;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
function infiniteimprobabilitydrive_content(&$a) {
 | 
						|
$baseurl = $a->get_baseurl() . '/addon/infiniteimprobabilitydrive';
 | 
						|
$o = '';
 | 
						|
 | 
						|
$a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.$a->get_baseurl().'/addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css"/>';
 | 
						|
 | 
						|
 | 
						|
$baseurl = $a->get_baseurl();
 | 
						|
 | 
						|
 | 
						|
  $o .= <<< EOT
 | 
						|
 | 
						|
<br><br>
 | 
						|
<p>Try another destination with the <a href="$baseurl/infiniteimprobabilitydrive">Infinite Improbability Drive</a>
 | 
						|
<iframe src ="$baseurl/randprof" height="1200" width="1024">
 | 
						|
 | 
						|
 | 
						|
 | 
						|
EOT;
 | 
						|
return $o;
 | 
						|
    
 | 
						|
} |