Get Online.php to see page locations.

[Albus]

I am not sure if this is in the install, or if I just missed it, but here's my remedy. This fixes online.php so that it will report the "Viewing x" text and a link to the page using it's proper title and link. This will only be usefull to you if you routinely create pages using the vBa "Add Page" function.

[includes/functions_online.php]

find this:


function construct_online_bit($userinfo, $doall = 0)
{


add under:


	global $DB_site;


find this:


		case 'bugs':
			$userinfo['action'] = construct_phrase($vbphrase['viewing_x'], 'Bugs'); // Don't report 'bugs' as needing to be translated please :p
			break;


add under:


		case 'page':
			$name = $userinfo['values']['page'];
			$page_rows = $DB_site->query("select title from " . TABLE_PREFIX . "adv_pages where name = '$name'");
			while($page_row = $DB_site->fetch_array($page_rows)) { $title = $page_row['title']; }
			$DB_site->free_result($page_rows);
			unset($page_rows, $page_row);
			$userinfo['action'] = construct_phrase($vbphrase['viewing_x'], $title);
			$userinfo['where'] = "<a href=\"$vboptions[bburl]/index.php?$session[sessionurl]page=$name\">$title</a>";
			break;


find this:


	default:
		$userinfo['activity'] = 'unknown';
	}


replace with:


	default:
		if (isset($userinfo['values']['page']) && !empty($userinfo['values']['page'])) {
			$userinfo['activity'] = 'page';
		} else {
			$userinfo['activity'] = 'unknown';
		}
	}