Infinite Improbability Drive - a very simple addon to make navigating randprof

less cumbersome.  Wouldn't normally put something this simple in the the git, but
it was user requested, and now other admins have expressed interest in having it here.

diff --git a/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css b/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css
new file mode 100644 (file)
index 0000000..f4be605
--- /dev/null
+++ b/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css
@@ -0,0 +1,4 @@
+section {
+       padding-left: 0px;
+       
+}
\ No newline at end of file

diff --git a/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php b/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php
new file mode 100644 (file)
index 0000000..dce3692
--- /dev/null
+++ b/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php
@@ -0,0 +1,49 @@
+<?php
+/**
+* Name: Infinite Improbability Drive
+* Description: Infinitely Improbably Find A Random User
+* Version: 1.0
+* Author: Thomas Willingham
+*/
+
+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;
+    
+}
\ No newline at end of file