File: editquestion.php

package info (click to toggle)
moodle 1.6.3-2
  • links: PTS
  • area: main
  • in suites: etch-m68k
  • size: 37,052 kB
  • ctags: 51,688
  • sloc: php: 231,916; sql: 5,631; xml: 2,688; perl: 638; sh: 441; makefile: 48; pascal: 36
file content (29 lines) | stat: -rw-r--r-- 968 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
<?php // $Id: editquestion.php,v 1.2 2006/04/05 05:53:32 gustav_delius Exp $
    if (!empty($question->id)) {
        $options = get_record("question_shortanswer", "question", $question->id);
    } else {
        $options->usecase = 0;
    }
    if (!empty($options->answers)) {
        $answersraw = get_records_list("question_answers", "id", $options->answers);
    }

    $answers = array();
    if (!empty($answersraw)) {
        foreach ($answersraw as $answer) {
            $answers[] = $answer;   // insert answers into slots
        }
    }

    $emptyanswer->answer = '';
    $i = count($answers);
    $limit = QUESTION_NUMANS;
    $limit = $limit <= $i ? $i+1 : $limit;
    for (; $i < $limit; $i++) {
        $answers[] = $emptyanswer;   // Make answer slots, default as blank
    }

    print_heading_with_help(get_string("editingshortanswer", "quiz"), "shortanswer", "quiz");
    require("$CFG->dirroot/question/type/shortanswer/editquestion.html");

?>