L-electron-Rare/moodle
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Shortanswers are not more robust when * wildcards being used

Browse Source
This commit is contained in:
moodler
2004-07-27 13:16:50 +00:00
parent fe4bc8337d
commit 26997a1f82
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mod/quiz/questiontypes/shortanswer/questiontype.php
+7 -1
View File
@@ -149,6 +149,11 @@ class quiz_shortanswer_qtype extends quiz_default_questiontype {
/// Determine ->answers[]
$result->answers = array();
if ('' !== $response0) {
/// These are things to protect in the strings when wildcards are used
$search = array('\\', '+', '(', ')', '[', ']', '-');
$replace = array('\\\\', '\+', '\(', '\)', '\[', '\]', '\-');
foreach ($answers as $answer) {
$answer->answer = trim($answer->answer); // Just in case
@@ -166,8 +171,9 @@ class quiz_shortanswer_qtype extends quiz_default_questiontype {
if (strpos(' '.$answer0, '*')) {
$answer0 = str_replace('\*','@@@@@@',$answer0);
$answer0 = str_replace('*','.*',$answer0);
$answer0 = str_replace($search, $replace, $answer0);
$answer0 = str_replace('@@@@@@', '\*',$answer0);
$answer0 = str_replace('+', '\+',$answer0);
if (ereg('^'.$answer0.'$', $response0)) {
$result->answers[$nameprefix] = $answer;
}