[Summary view]

Differences Between: [Versions 310 and 311] [Versions 310 and 400] [Versions 310 and 401] [Versions 310 and 402] [Versions 310 and 403]

   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 tests that walks a question through a whole attempt.
  19   *
  20   * @package core_question
  21   * @copyright 2017 The Open University
  22   * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  23   */
  24  
  25  
  26  defined('MOODLE_INTERNAL') || die();
  27  
  28  global $CFG;
  29  require_once (__DIR__ . '/..//lib.php');
  30  require_once (__DIR__ . '/helpers.php');
  31  
  32  
  33  /**
  34   * End-to-end tests of attempting a question.
  35   *
  36   * @copyright  2017 The Open University
  37   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  38   */
  39  class core_question_walkthrough_testcase extends qbehaviour_walkthrough_test_base {
  40  
  41      public function test_regrade_does_not_lose_flag() {
  42  
  43          // Create a true-false question with correct answer true.
  44          $tf = test_question_maker::make_question('truefalse', 'true');
  45          $this->start_attempt_at_question($tf, 'deferredfeedback', 2);
  46  
  47          // Process a true answer.
  48          $this->process_submission(array('answer' => 1));
  49  
  50          // Finish the attempt.
  51          $this->quba->finish_all_questions();
  52  
  53          // Flag the question.
  54          $this->get_question_attempt()->set_flagged(true);
  55  
  56          // Now change the correct answer to the question, and regrade.
  57          $tf->rightanswer = false;
  58          $this->quba->regrade_all_questions();
  59  
  60          // Verify the flag has not been lost.
  61          $this->assertTrue($this->get_question_attempt()->is_flagged());
  62      }
  63  }