|
Moodle
2.2.1
http://www.collinsharper.com
|
00001 <?php 00002 00003 // This file is part of Moodle - http://moodle.org/ 00004 // 00005 // Moodle is free software: you can redistribute it and/or modify 00006 // it under the terms of the GNU General Public License as published by 00007 // the Free Software Foundation, either version 3 of the License, or 00008 // (at your option) any later version. 00009 // 00010 // Moodle is distributed in the hope that it will be useful, 00011 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00012 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00013 // GNU General Public License for more details. 00014 // 00015 // You should have received a copy of the GNU General Public License 00016 // along with Moodle. If not, see <http://www.gnu.org/licenses/>. 00017 00018 00032 if (!defined('MOODLE_INTERNAL')) { 00033 die('Direct access to this script is forbidden.'); // It must be included from a Moodle page 00034 } 00035 00036 $strmnetservices = get_string('mnetservices', 'mnet'); 00037 $strmnetlog = get_string('mnetlog', 'mnet'); 00038 $strmnetedithost = get_string('reviewhostdetails', 'mnet'); 00039 00040 $logurl = $CFG->wwwroot. 00041 '/report/log/index.php?chooselog=1&showusers=1&showcourses=1&host_course='.$mnet_peer->id. 00042 '%2F1&user='.'0'. 00043 '&date=0'. 00044 '&modid=&modaction=0&logformat=showashtml'; 00045 $tabs = array(); 00046 if (isset($mnet_peer->id) && $mnet_peer->id > 0) { 00047 $tabs[] = new tabobject('mnetdetails', 'peers.php?step=update&hostid='.$mnet_peer->id, $strmnetedithost, $strmnetedithost, false); 00048 $tabs[] = new tabobject('mnetservices', 'services.php?hostid='.$mnet_peer->id, $strmnetservices, $strmnetservices, false); 00049 if ($mnet_peer->application->name == 'moodle' && $mnet_peer->id != $CFG->mnet_all_hosts_id) { 00050 $tabs[] = new tabobject('mnetlog', $logurl, $strmnetlog, $strmnetlog, false); 00051 } 00052 $tabs[] = new tabobject('mnetprofilefields', 'profilefields.php?hostid=' . $mnet_peer->id, get_string('profilefields', 'mnet'), get_string('profilefields', 'mnet'), false); 00053 } else { 00054 $tabs[] = new tabobject('mnetdetails', '#', $strmnetedithost, $strmnetedithost, false); 00055 } 00056 print_tabs(array($tabs), $currenttab);