mirror_php/moodle
1
0
Fork 0
mirror of https://github.com/moodle/moodle.git synced 2025-01-18 22:08:20 +01:00
Code Issues Projects Releases Wiki Activity

MDL-7428 - Quiz regrade removes student answers from essay questions that have been graded. Merged from MOODLE_16_STABLE.

Browse Source
This commit is contained in:
tjhunt 2006-11-15 17:32:49 +00:00
parent a4d79b0eb5
commit 84bf852c1b
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/questionlib.php
View File

@ -1207,6 +1207,12 @@ function question_process_comment($question, &$state, &$attempt, $comment, $grad
// to set the $state->changed flag.
if (abs($state->last_graded->grade - $grade) > 0.002 ||
$state->last_graded->event != QUESTION_EVENTMANUALGRADE) {
// We want to update existing state (rather than creating new one) if it
// was itself created by a manual grading event.
$state->update = ($state->event == QUESTION_EVENTMANUALGRADE) ? 1 : 0;
// Update the other parts of the state object.
$state->raw_grade = $grade;
$state->grade = $grade;
$state->penalty = 0;
@ -1214,10 +1220,6 @@ function question_process_comment($question, &$state, &$attempt, $comment, $grad
$state->seq_number++;
$state->event = QUESTION_EVENTMANUALGRADE;
// We want to update existing state (rather than creating new one) if it
// was itself created by a manual grading event.
$state->update = ($state->event == QUESTION_EVENTMANUALGRADE) ? 1 : 0;
// Update the last graded state (don't simplify!)
unset($state->last_graded);
$state->last_graded = clone($state);