Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
/**
18
 * Allows you to edit a users profile
19
 *
20
 * @copyright 2020 François Moreau
21
 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
22
 * @package core_user
23
 */
24
 
25
require_once('../config.php');
26
require_once($CFG->dirroot.'/user/editlib.php');
27
require_once($CFG->dirroot.'/user/lib.php');
28
 
29
require_login();
30
 
31
$userid = optional_param('id', $USER->id, PARAM_INT);    // User id.
32
 
33
$PAGE->set_url('/user/contentbank.php', ['id' => $userid]);
34
 
35
list($user, $course) = useredit_setup_preference_page($userid, SITEID);
36
 
37
$form = new \core_user\form\contentbank_user_preferences_form(null, ['userid' => $user->id]);
38
 
39
$user->contentvisibility = get_user_preferences('core_contentbank_visibility',
40
    $CFG->defaultpreference_core_contentbank_visibility, $user->id);
41
 
42
$form->set_data($user);
43
 
44
$redirect = new moodle_url("/user/preferences.php", ['userid' => $user->id]);
45
 
46
if ($form->is_cancelled()) {
47
    redirect($redirect);
48
} else if ($data = $form->get_data()) {
49
    $data = $form->get_data();
50
    $usernew = [
51
        'id' => $user->id,
52
        'preference_core_contentbank_visibility' => $data->contentvisibility
53
    ];
54
    useredit_update_user_preference($usernew);
55
 
56
    \core\event\user_updated::create_from_userid($user->id)->trigger();
57
    redirect($redirect);
58
}
59
 
60
$title = get_string('contentbankpreferences', 'core_contentbank');
61
$userfullname = fullname($user, true);
62
 
63
$PAGE->navbar->includesettingsbase = true;
64
 
65
$PAGE->set_title("$course->shortname: $title");
66
$PAGE->set_heading($userfullname);
67
 
68
echo $OUTPUT->header();
69
echo $OUTPUT->heading($title);
70
$form->display();
71
echo $OUTPUT->footer();