if (!checkgroup($fdata['forum_access']) && !checkgroup($fdata['forum_moderators']) || !$fdata['forum_cat']) {
        redirect(make_url(FORUM . "index.php", "forum", "", ".html"));
    }
    // Pimped: make_url
} else {
    redirect(make_url(FORUM . "index.php", "forum", "", ".html"));
    // Pimped: make_url
}
if ($fdata['forum_post']) {
    $can_post = checkgroup($fdata['forum_post']);
} else {
    $can_post = false;
}
// Pimped: Forum Observer
require_once FORUM_INC . "forum_observer.php";
whoishere_observer("forum");
// locale dependent forum buttons
if (is_array($fusion_images)) {
    if ($settings['locale'] != "English") {
        $newpath = "";
        $oldpath = explode("/", $fusion_images['newthread']);
        for ($i = 0; $i < count($oldpath) - 1; $i++) {
            $newpath .= $oldpath[$i] . "/";
        }
        if (is_dir($newpath . $settings['locale'])) {
            redirect_img_dir($newpath, $newpath . $settings['locale'] . "/");
        }
    }
}
// locale dependent forum buttons
if (iMODERATOR) {
} else {
    $can_post = false;
}
if ($fdata['forum_reply'] != 0 && checkgroup($fdata['forum_reply'])) {
    $can_reply = true;
} else {
    $can_reply = false;
}
if ($settings['forum_edit_lock'] == 1) {
    $lock_edit = true;
} else {
    $lock_edit = false;
}
// Pimped: Forum Observer
require_once FORUM_INC . "forum_observer.php";
whoishere_observer("thread");
//locale dependent forum buttons
if (is_array($fusion_images)) {
    if ($settings['locale'] != "English") {
        $newpath = "";
        $oldpath = explode("/", $fusion_images['newthread']);
        for ($i = 0; $i < count($oldpath) - 1; $i++) {
            $newpath .= $oldpath[$i] . "/";
        }
        if (is_dir($newpath . $settings['locale'])) {
            redirect_img_dir($newpath, $newpath . $settings['locale'] . "/");
        }
    }
}
//locale dependent forum buttons
$mod_groups = explode(".", $fdata['forum_moderators']);
+----------------------------------------------------------------------------+
| based on PHP-Fusion CMS v7.01 by Nick Jones
| http://www.php-fusion.co.uk/
+----------------------------------------------------------------------------+
| This program is released as free software under the Affero GPL license.
| You can redistribute it and/or modify it under the terms of this license
| which you can read by viewing the included agpl.txt or online
| at www.gnu.org/licenses/agpl.html. Removal of this copyright header is
| strictly prohibited without written permission from the original author(s).
+---------------------------------------------------------------------------*/
require_once "../maincore.php";
require_once TEMPLATES . "header.php";
include LOCALE . LOCALESET . "forum/main.php";
// Pimped: Forum Observer
require_once FORUM_INC . "forum_observer.php";
whoishere_observer("index");
if (!isset($lastvisited) || !isnum($lastvisited)) {
    $lastvisited = time();
}
add_to_title($locale['global_200'] . $locale['400']);
opentable($locale['400']);
echo "<!--pre_forum_idx--><table cellpadding='0' cellspacing='1' width='100%' class='tbl-border forum_idx_table'>\n";
$forum_list = '';
$current_cat = '';
$access = '';
// Pimped: access
$aresult = dbquery("SELECT f.forum_id, f.forum_access\r\n\tFROM " . DB_FORUMS . " f\r\n\tLEFT JOIN " . DB_FORUMS . " f2 ON f.forum_cat = f2.forum_id\r\n\tWHERE f.forum_cat!='0' AND f.forum_parent='0'" . (!(bool) IF_MULTI_LANGUAGE_FORUM ? '' : " AND (f2.forum_language='all' OR f2.forum_language='" . LANGUAGE . "')") . "\r\n\tGROUP BY forum_id ORDER BY f2.forum_order ASC, f.forum_order ASC");
while ($adata = dbarray($aresult)) {
    if ($access != '') {
        $access .= "|";
    }