From 7939a4a0cba0134981b3a7680902acb4e503fbaa Mon Sep 17 00:00:00 2001
From: thepurpleblob <thepurpleblob>
Date: Wed, 21 Feb 2007 14:20:46 +0000
Subject: [PATCH] MDL-8563 $question->answer was swapped for
 $question->correctanswer in questiontype for some reason! Compensated for in
 format type.

---
 question/format/gift/format.php | 4 ++--
 question/format/xml/format.php  | 2 ++
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/question/format/gift/format.php b/question/format/gift/format.php
index e719ab84c6..e2c90bcb54 100755
--- a/question/format/gift/format.php
+++ b/question/format/gift/format.php
@@ -363,8 +363,8 @@ class qformat_gift extends qformat_default {
                     $question->feedbacktrue = $feedback['wrong'];
                 }
 
-                //$question->defaultgrade = 1;
-                //$question->image = "";   // No images with this format
+                $question->correctanswer = $question->answer;
+
                 return $question;
                 break;
                 
diff --git a/question/format/xml/format.php b/question/format/xml/format.php
index cf091ab643..de91b20bd5 100755
--- a/question/format/xml/format.php
+++ b/question/format/xml/format.php
@@ -232,9 +232,11 @@ class qformat_xml extends qformat_default {
             } 
             if ($answertext == 'true') {
                 $qo->answer = ($answer['@']['fraction'] == 100);
+                $qo->correctanswer = $qo->answer;
                 $qo->feedbacktrue = $feedback;
             } else {
                 $qo->answer = ($answer['@']['fraction'] != 100);
+                $qo->correctanswer = $qo->answer;
                 $qo->feedbackfalse = $feedback;
             }
             $first = false;
-- 
2.39.5