dirroot .'/course/lib.php');
require_once($CFG->dirroot .'/lib/blocklib.php');
require_once($CFG->dirroot .'/mod/resource/lib.php');
require_once($CFG->dirroot .'/mod/forum/lib.php');
optional_param('blockaction');
optional_param('instanceid', 0, PARAM_INT);
optional_param('blockid', 0, PARAM_INT);
if (! $site = get_site()) {
redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
}
if ($CFG->forcelogin) {
require_login();
}
if (isadmin()) {
if (moodle_needs_upgrading()) {
redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
}
}
if (empty($USER->id)) {
if (empty($CFG->loginhttps)) {
$wwwroot = $CFG->wwwroot;
} else {
$wwwroot = str_replace('http', 'https', $CFG->wwwroot);
}
$loginstring = "".get_string('login').'';
} else {
$loginstring = ''. user_login_string($site) .'';
}
if (empty($CFG->langmenu)) {
$langmenu = '';
} else {
$currlang = current_language();
$langs = get_list_of_languages();
$langmenu = popup_form ($CFG->wwwroot .'/index.php?lang=', $langs, 'chooselang', $currlang, '', '', '', true);
}
$PAGE = page_create_object(MOODLE_PAGE_COURSE, SITEID);
print_header(strip_tags($site->fullname), $site->fullname, 'home', '',
'',
true, '', $loginstring . '
' . $langmenu);
$editing = $PAGE->user_is_editing();
$pageblocks = blocks_get_by_page($PAGE);
if($editing) {
if (!empty($blockaction) && confirm_sesskey()) {
if (!empty($blockid)) {
blocks_execute_action($PAGE, $pageblocks, strtolower($blockaction), intval($blockid));
}
else if (!empty($instanceid)) {
$instance = blocks_find_instance($instanceid, $pageblocks);
blocks_execute_action($PAGE, $pageblocks, strtolower($blockaction), $instance);
}
// This re-query could be eliminated by judicious programming in blocks_execute_action(),
// but I'm not sure if it's worth the complexity increase...
$pageblocks = blocks_get_by_page($PAGE);
}
$missingblocks = blocks_get_missing($PAGE, $pageblocks);
}
optional_variable($preferred_width_left, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT]));
optional_variable($preferred_width_right, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT]));
$preferred_width_left = min($preferred_width_left, BLOCK_L_MAX_WIDTH);
$preferred_width_left = max($preferred_width_left, BLOCK_L_MIN_WIDTH);
$preferred_width_right = min($preferred_width_right, BLOCK_R_MAX_WIDTH);
$preferred_width_right = max($preferred_width_right, BLOCK_R_MIN_WIDTH);
?>
';
/// Print Section
if ($site->numsections > 0) {
print_simple_box_start('center', '100%', $THEME->cellcontent, 5, 'sitetopic');
/// If currently moving a file then show the current clipboard
if (ismoving($site->id)) {
$stractivityclipboard = strip_tags(get_string('activityclipboard', '', addslashes($USER->activitycopyname)));
echo ' '; echo "$stractivityclipboard (". get_string('cancel') .')'; echo ' '; } if (!$section = get_record('course_sections', 'course', $site->id, 'section', 1)) { delete_records('course_sections', 'course', $site->id, 'section', 1); // Just in case $section->course = $site->id; $section->section = 1; $section->summary = ''; $section->visible = 1; $section->id = insert_record('course_sections', $section); } echo format_text($section->summary, FORMAT_HTML); if ($editing) { $streditsummary = get_string('editsummary'); echo "id\">pixpath/t/edit.gif\" ". " height=\"11\" width=\"11\" border=\"0\" alt=\"$streditsummary\" />"; } get_all_mods($site->id, $mods, $modnames, $modnamesplural, $modnamesused); print_section($site, $section, $mods, $modnamesused, true); if ($editing) { print_section_add_menus($site, $section->section, $modnames); } print_simple_box_end(); print_spacer(10); } switch ($CFG->frontpage) { /// Display the main part of the front page. case FRONTPAGENEWS: if (! $newsforum = forum_get_course_forum($site->id, 'news')) { error('Could not find or create a main news forum for the site'); } if (isset($USER->id)) { $SESSION->fromdiscussion = $CFG->wwwroot; if (forum_is_subscribed($USER->id, $newsforum->id)) { $subtext = get_string('unsubscribe', 'forum'); } else { $subtext = get_string('subscribe', 'forum'); } $headertext = "
| ';
// The right column
if(blocks_have_content($pageblocks[BLOCK_POS_RIGHT]) || $editing || isadmin()) {
echo '';
if (isadmin()) {
echo ' '.update_course_icon($site->id).' ';
echo ''; } blocks_print_group($PAGE, $pageblocks[BLOCK_POS_RIGHT]); if ($editing && !empty($missingblocks)) { blocks_print_adminblock($PAGE, $missingblocks); } echo ' | ';
}
?>