diff --git a/lang/en/question.php b/lang/en/question.php
index 5a49ddac89c..33ec7f7153b 100644
--- a/lang/en/question.php
+++ b/lang/en/question.php
@@ -457,6 +457,8 @@ $string['rightanswer'] = 'Right answer';
$string['rightanswer_help'] = 'An automatically generated summary of the correct response. This can be limited, so you may wish to consider explaining the correct solution in the general feedback for the question, and turning this option off.';
$string['saved'] = 'Saved: {$a}';
$string['settingsformultipletries'] = 'Multiple tries';
+$string['shortversioninfo'] = 'v{$a->version} (of {$a->latestversion})';
+$string['shortversioninfolatest'] = 'v{$a->version} (latest)';
$string['showhidden'] = 'Also show old questions';
$string['showmarkandmax'] = 'Show mark and max';
$string['showmaxmarkonly'] = 'Show max mark only';
@@ -505,6 +507,8 @@ $string['qbanknotfound'] = 'The \'{$a}\' question bank plugin doesn\'t exist or
$string['noquestionbanks'] = 'No question bank plugin found.';
$string['questionloaderror'] = 'Could not load the question options.';
$string['version_selection'] = 'Version {$a->version}';
+$string['versioninfo'] = 'Version {$a->version} (of {$a->latestversion})';
+$string['versioninfolatest'] = 'Version {$a->version} (latest)';
$string['question_version'] = 'Question version';
// Deprecated since Moodle 4.0.
diff --git a/question/bank/previewquestion/preview.php b/question/bank/previewquestion/preview.php
index 437ba77a688..2ee19639192 100644
--- a/question/bank/previewquestion/preview.php
+++ b/question/bank/previewquestion/preview.php
@@ -83,6 +83,7 @@ $maxvariant = min($question->get_num_variants(), QUESTION_PREVIEW_MAX_VARIANTS);
$options = new question_preview_options($question);
$options->load_user_defaults();
$options->set_from_request();
+$options->versioninfo = false;
$PAGE->set_url(helper::question_preview_url($id, $options->behaviour, $options->maxmark,
$options, $options->variant, $context, null, $restartversion));
@@ -264,11 +265,9 @@ $previewdata = [];
$previewdata['questionicon'] = print_question_icon($question);
$previewdata['questionidumber'] = $question->idnumber;
$previewdata['questiontitle'] = $question->name;
-$islatestversion = is_latest($question->version, $question->questionbankentryid);
-if ($islatestversion) {
- $previewdata['versiontitle'] = get_string('versiontitlelatest', 'qbank_previewquestion', $question->version);
-} else {
- $previewdata['versiontitle'] = get_string('versiontitle', 'qbank_previewquestion', $question->version);
+$versioninfo = new \core_question\output\question_version_info($question);
+$previewdata['versiontitle'] = $versioninfo->export_for_template($OUTPUT);
+if ($versioninfo->version !== $versioninfo->latestversion) {
if ($restartversion == question_preview_options::ALWAYS_LATEST) {
$newerversionparams = (object) [
'currentversion' => $question->version,
diff --git a/question/bank/previewquestion/templates/preview_question.mustache b/question/bank/previewquestion/templates/preview_question.mustache
index 68f0d919dde..3d750537c97 100644
--- a/question/bank/previewquestion/templates/preview_question.mustache
+++ b/question/bank/previewquestion/templates/preview_question.mustache
@@ -41,7 +41,9 @@
"question": "question html
",
"questionicon": "",
"questiontitle": "Question title",
- "versiontitle": "Version 3 (latest)",
+ "versiontitle": {
+ "versioninfo": "Version 3 (latest)"
+ },
"questionidumber": "qidnumber1",
"restartdisabled": "disabled='disabled'",
"finishdisabled": "disabled='disabled'",
@@ -58,7 +60,9 @@
{{{questionicon}}}
{{questiontitle}}
- {{versiontitle}}
+ {{#versiontitle}}
+ {{>core_question/question_version_info}}
+ {{/versiontitle}}
{{#newerversion}}
diff --git a/question/bank/previewquestion/tests/behat/preview_question.feature b/question/bank/previewquestion/tests/behat/preview_question.feature
index 45f66a0bfea..70bc0634113 100644
--- a/question/bank/previewquestion/tests/behat/preview_question.feature
+++ b/question/bank/previewquestion/tests/behat/preview_question.feature
@@ -149,18 +149,18 @@ Feature: A teacher can preview questions in the question bank
| Test questions | Test question to be previewed | Question version 2 |
And I choose "History" action for "Test question to be previewed" in the question bank
And I choose "Preview" action for "Test question to be previewed" in the question bank
- And I should see "Version 1"
+ And I should see "Version 1 (of 2)"
And I expand all fieldsets
And the field "Question version" matches value "1"
And I set the field "Answer:" to "3.14"
And I press "Submit and finish"
- And I should see "Version 1"
+ And I should see "Version 1 (of 2)"
And I should not see "The latest version is 2."
And the following "core_question > updated questions" exist:
| questioncategory | question | questiontext |
| Test questions | Test question to be previewed | Question version 3 |
When I press "Start again"
- Then I should see "Version 1"
+ Then I should see "Version 1 (of 3)"
And I should not see "Version 3 (latest)"
Scenario: Question preview can be closed
diff --git a/question/bank/usage/tests/behat/question_usage_column.feature b/question/bank/usage/tests/behat/question_usage_column.feature
index ce711d76c24..64138c923dc 100644
--- a/question/bank/usage/tests/behat/question_usage_column.feature
+++ b/question/bank/usage/tests/behat/question_usage_column.feature
@@ -36,5 +36,6 @@ Feature: Use the qbank plugin manager page for question usage
And I should see "0" on the usage column
When I click "0" on the usage column
Then I should see "Version 1"
+ And I should see "v1 (latest)" in the "Question 1" "question"
And I click on "Close" "button" in the ".modal-dialog" "css_element"
And I should see "0" on the usage column
diff --git a/question/classes/output/question_version_info.php b/question/classes/output/question_version_info.php
new file mode 100644
index 00000000000..a907b0d3776
--- /dev/null
+++ b/question/classes/output/question_version_info.php
@@ -0,0 +1,115 @@
+.
+
+namespace core_question\output;
+
+use renderer_base;
+
+/**
+ * Track and display question version information.
+ *
+ * This class handles rendering the question version information (the current version of the question, the total number of versions,
+ * and if the current version is the latest). It also tracks loaded question definitions that don't yet have the latest version
+ * loaded, and handles loading the latest version of all pending questions.
+ *
+ * @package core_question
+ * @copyright 2023 onwards Catalyst IT EU {@link https://catalyst-eu.net}
+ * @author Mark Johnson
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class question_version_info implements \renderable, \templatable {
+
+ /**
+ * @var array List of definitions that don't know whether they are the latest version yet.
+ */
+ public static array $pendingdefinitions = [];
+
+ /**
+ * @var int $version The current version number.
+ */
+ public int $version;
+
+ /**
+ * @var ?int $latestversion The latest version number of this question.
+ */
+ public ?int $latestversion;
+
+ /**
+ * @var bool $shortversion Are we displaying an abbreviation for "version" rather than the full word?
+ */
+ protected bool $shortversion;
+
+ /**
+ * Store the current and latest versions of the question, and whether we want to abbreviate the output string.
+ *
+ * @param \question_definition $question
+ * @param bool $shortversion
+ */
+ public function __construct(\question_definition $question, bool $shortversion = false) {
+ $this->version = $question->version;
+ $this->latestversion = $question->latestversion;
+ $this->shortversion = $shortversion;
+ }
+
+ /**
+ * Find and set the latest version of all pending question_definition objects.
+ *
+ * This will update all pending objects in one go, saving us having to do a query for each question.
+ *
+ * @return void
+ */
+ public static function populate_latest_versions(): void {
+ global $DB;
+ $pendingentryids = array_map(fn($definition) => $definition->questionbankentryid, self::$pendingdefinitions);
+ [$insql, $params] = $DB->get_in_or_equal($pendingentryids);
+
+ $sql = "SELECT questionbankentryid, MAX(version) AS latestversion
+ FROM {question_versions}
+ WHERE questionbankentryid $insql
+ GROUP BY questionbankentryid";
+ $latestversions = $DB->get_records_sql_menu($sql, $params);
+ array_walk(self::$pendingdefinitions, function($definition) use ($latestversions) {
+ if (!isset($latestversions[$definition->questionbankentryid])) {
+ return;
+ }
+ $definition->set_latest_version($latestversions[$definition->questionbankentryid]);
+ unset(self::$pendingdefinitions[$definition->id]);
+ });
+ }
+
+ /**
+ * Return the question version info as a string, including the version number and whether this is the latest version.
+ *
+ * @param renderer_base $output
+ * @return array
+ * @throws \coding_exception
+ */
+ public function export_for_template(renderer_base $output): array {
+ if (is_null($this->latestversion)) {
+ return [];
+ }
+ $identifier = 'versioninfo';
+ if ($this->version === $this->latestversion) {
+ $identifier .= 'latest';
+ }
+ if ($this->shortversion) {
+ $identifier = 'short' . $identifier;
+ }
+ return [
+ 'versioninfo' => get_string($identifier, 'question', $this)
+ ];
+ }
+}
diff --git a/question/engine/bank.php b/question/engine/bank.php
index 866d7d15280..5c0e1dc8191 100644
--- a/question/engine/bank.php
+++ b/question/engine/bank.php
@@ -27,6 +27,7 @@
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
+use core_question\output\question_version_info;
defined('MOODLE_INTERNAL') || die();
@@ -285,7 +286,9 @@ abstract class question_bank {
* @return question_definition loaded from the database.
*/
public static function make_question($questiondata) {
- return self::get_qtype($questiondata->qtype, false)->make_question($questiondata, false);
+ $definition = self::get_qtype($questiondata->qtype, false)->make_question($questiondata, false);
+ question_version_info::$pendingdefinitions[$definition->id] = $definition;
+ return $definition;
}
/**
diff --git a/question/engine/lib.php b/question/engine/lib.php
index 3824dce2324..213838a878d 100644
--- a/question/engine/lib.php
+++ b/question/engine/lib.php
@@ -653,6 +653,11 @@ class question_display_options {
*/
public $questionidentifier = null;
+ /**
+ * @var ?bool $versioninfo Should we display the version in the question info?
+ */
+ public ?bool $versioninfo = null;
+
/**
* Set all the feedback-related fields {@link $feedback}, {@link generalfeedback},
* {@link rightanswer} and {@link manualcomment} to
diff --git a/question/engine/questionattempt.php b/question/engine/questionattempt.php
index d6539c944f6..34d09486050 100644
--- a/question/engine/questionattempt.php
+++ b/question/engine/questionattempt.php
@@ -23,6 +23,7 @@
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
+use core_question\local\bank\question_edit_contexts;
defined('MOODLE_INTERNAL') || die();
@@ -903,6 +904,9 @@ class question_attempt {
global $PAGE;
$page = $PAGE;
}
+ if (is_null($options->versioninfo)) {
+ $options->versioninfo = (new question_edit_contexts($page->context))->have_one_edit_tab_cap('questions');
+ }
$qoutput = $page->get_renderer('core', 'question');
$qtoutput = $this->question->get_renderer($page);
return $this->behaviour->render($options, $number, $qoutput, $qtoutput);
diff --git a/question/engine/renderer.php b/question/engine/renderer.php
index fe78e0099ae..44fb155e670 100644
--- a/question/engine/renderer.php
+++ b/question/engine/renderer.php
@@ -23,6 +23,7 @@
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
+use core_question\output\question_version_info;
defined('MOODLE_INTERNAL') || die();
@@ -145,6 +146,9 @@ class core_question_renderer extends plugin_renderer_base {
$output .= $this->mark_summary($qa, $behaviouroutput, $options);
$output .= $this->question_flag($qa, $options->flags);
$output .= $this->edit_question_link($qa, $options);
+ if ($options->versioninfo) {
+ $output .= $this->render(new question_version_info($qa->get_question(), true));
+ }
return $output;
}
diff --git a/question/templates/question_version_info.mustache b/question/templates/question_version_info.mustache
new file mode 100644
index 00000000000..530fd6d807d
--- /dev/null
+++ b/question/templates/question_version_info.mustache
@@ -0,0 +1,26 @@
+{{!
+ This file is part of Moodle - http://moodle.org/
+ Moodle is free software: you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
+ Moodle is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+ You should have received a copy of the GNU General Public License
+ along with Moodle. If not, see .
+}}
+{{!
+ @template core_question/question_version_info
+
+ Displays a badge containing the version information of a question
+ * versioninfo - The version information string, including the number and whether it is the latest verision.
+
+ Example context (json):
+ {
+ "versioninfo": "Version 2 (latest)"
+ }
+}}
+
+{{versioninfo}}
diff --git a/question/tests/version_test.php b/question/tests/version_test.php
index 2a431637a95..9b879e93b53 100644
--- a/question/tests/version_test.php
+++ b/question/tests/version_test.php
@@ -17,6 +17,7 @@
namespace core_question;
use core_question\local\bank\question_version_status;
+use core_question\output\question_version_info;
use question_bank;
/**
@@ -65,6 +66,11 @@ class version_test extends \advanced_testcase {
$this->context = \context_module::instance($this->quiz->cmid);
}
+ protected function tearDown(): void {
+ question_version_info::$pendingdefinitions = [];
+ parent::tearDown();
+ }
+
/**
* Test if creating a question a new version and bank entry records are created.
*
@@ -288,4 +294,48 @@ class version_test extends \advanced_testcase {
$this->assertEquals(array_slice($questiondefinition, 1, 1)[0]->questionid, $questionid2);
$this->assertEquals(array_slice($questiondefinition, 2, 1)[0]->questionid, $questionid1);
}
+
+ /**
+ * Test population of latestversion field in question_definition objects
+ *
+ * When an instance of question_definition is created, it is added to an array of pending definitions which
+ * do not yet have the latestversion field populated. When one definition has its latestversion property accessed,
+ * all pending definitions have their latestversion field populated at once.
+ *
+ * @covers \core_question\output\question_version_info::populate_latest_versions()
+ * @return void
+ */
+ public function test_populate_definition_latestversions() {
+ $qcategory = $this->qgenerator->create_question_category(['contextid' => $this->context->id]);
+ $question1 = $this->qgenerator->create_question('shortanswer', null, ['category' => $qcategory->id]);
+ $question2 = $this->qgenerator->create_question('shortanswer', null, ['category' => $qcategory->id]);
+ $question3 = $this->qgenerator->update_question($question2, null, ['idnumber' => 'id2']);
+
+ $latestversioninspector = new \ReflectionProperty('question_definition', 'latestversion');
+ $latestversioninspector->setAccessible(true);
+ $this->assertEmpty(question_version_info::$pendingdefinitions);
+
+ $questiondef1 = question_bank::load_question($question1->id);
+ $questiondef2 = question_bank::load_question($question2->id);
+ $questiondef3 = question_bank::load_question($question3->id);
+
+ $this->assertContains($questiondef1, question_version_info::$pendingdefinitions);
+ $this->assertContains($questiondef2, question_version_info::$pendingdefinitions);
+ $this->assertContains($questiondef3, question_version_info::$pendingdefinitions);
+ $this->assertNull($latestversioninspector->getValue($questiondef1));
+ $this->assertNull($latestversioninspector->getValue($questiondef2));
+ $this->assertNull($latestversioninspector->getValue($questiondef3));
+
+ // Read latestversion from one definition. This should populate the field in all pending definitions.
+ $latestversion1 = $questiondef1->latestversion;
+
+ $this->assertEmpty(question_version_info::$pendingdefinitions);
+ $this->assertNotNull($latestversioninspector->getValue($questiondef1));
+ $this->assertNotNull($latestversioninspector->getValue($questiondef2));
+ $this->assertNotNull($latestversioninspector->getValue($questiondef3));
+ $this->assertEquals($latestversion1, $latestversioninspector->getValue($questiondef1));
+ $this->assertEquals($questiondef1->version, $questiondef1->latestversion);
+ $this->assertNotEquals($questiondef2->version, $questiondef2->latestversion);
+ $this->assertEquals($questiondef3->version, $questiondef3->latestversion);
+ }
}
diff --git a/question/type/questionbase.php b/question/type/questionbase.php
index cbee8a562b7..672f90a4ad9 100644
--- a/question/type/questionbase.php
+++ b/question/type/questionbase.php
@@ -41,6 +41,7 @@
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
+use core_question\output\question_version_info;
defined('MOODLE_INTERNAL') || die();
@@ -130,6 +131,9 @@ abstract class question_definition {
/** @var int Bank entry id for the question */
public $questionbankentryid;
+ /** @var ?int The latest version of the question. null if we haven't checked yet. */
+ protected $latestversion = null;
+
/**
* @var array of array of \core_customfield\data_controller objects indexed by fieldid for the questions custom fields.
*/
@@ -143,6 +147,21 @@ abstract class question_definition {
public function __construct() {
}
+ /**
+ * When a pending definition tries to read its latest version, fill in the latest version for all pending definitions
+ *
+ * @param string $name
+ * @return mixed
+ */
+ public function __get($name) {
+ if ($name === 'latestversion') {
+ if (isset(question_version_info::$pendingdefinitions[$this->id])) {
+ question_version_info::populate_latest_versions();
+ }
+ return $this->latestversion;
+ }
+ }
+
/**
* @return string the name of the question type (for example multichoice) that this
* question is.
@@ -512,6 +531,18 @@ abstract class question_definition {
DEBUG_DEVELOPER);
return null;
}
+
+ /**
+ * Set the latest version.
+ *
+ * Making $this->latestversion public would break the magic __get() behaviour above, so allow it to be set externally.
+ *
+ * @param int $latestversion
+ * @return void
+ */
+ public function set_latest_version(int $latestversion): void {
+ $this->latestversion = $latestversion;
+ }
}