question/upgrade.php

   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  * This file contains datbase upgrade code that is called from lib/db/upgrade.php,
  19  * and also check methods that can be used for pre-install checks via
  20  * admin/environment.php and lib/environmentlib.php.
  21  *
  22  * @package    moodlecore
  23  * @subpackage questionbank
  24  * @copyright  2007 The Open University
  25  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  26  */
  27
  28
  29 defined('MOODLE_INTERNAL') || die();
  30
  31
  32 /**
  33  * In Moodle, all random questions should have question.parent set to be the same
  34  * as question.id. One effect of MDL-5482 is that this will not be true for questions that
  35  * were backed up then restored. The probably does not cause many problems, except occasionally,
  36  * if the bogus question.parent happens to point to a multianswer question type, or when you
  37  * try to do a subsequent backup. Anyway, these question.parent values should be fixed, and
  38  * that is what this update does.
  39  */
  40 function question_fix_random_question_parents() {
  41     global $CFG, $DB;
  42     $DB->execute("UPDATE {question} SET parent = id WHERE qtype = 'random' AND parent <> id");
  43
  44     return true;
  45 }