mirror of
https://github.com/moodle/moodle.git
synced 2025-02-22 19:06:51 +01:00
53 lines
2.0 KiB
PHP
53 lines
2.0 KiB
PHP
|
<?php
|
||
|
|
|
||
|
|
/************** add end of cluster ************************************/
|
||
|
|
|
||
|
|
if (!isteacher($course->id)) {
|
||
|
|
error("Only teachers can look at this page");
|
||
|
|
}
|
||
|
|
|
||
|
|
confirm_sesskey();
|
||
|
|
|
||
|
|
// first get the preceeding page
|
||
|
|
$pageid = required_param('pageid', PARAM_INT);
|
||
|
|
|
||
|
|
$timenow = time();
|
||
|
|
|
||
|
|
// the new page is not the first page (end of cluster always comes after an existing page)
|
||
|
|
if (!$page = get_record("lesson_pages", "id", $pageid)) {
|
||
|
|
error("Error: Could not find page");
|
||
|
|
}
|
||
|
|
|
||
|
|
// could put code in here to check if the user really can insert an end of cluster
|
||
|
|
|
||
|
|
$newpage = new stdClass;
|
||
|
|
$newpage->lessonid = $lesson->id;
|
||
|
|
$newpage->prevpageid = $pageid;
|
||
|
|
$newpage->nextpageid = $page->nextpageid;
|
||
|
|
$newpage->qtype = LESSON_ENDOFCLUSTER;
|
||
|
|
$newpage->timecreated = $timenow;
|
||
|
|
$newpage->title = get_string("endofclustertitle", "lesson");
|
||
|
|
$newpage->contents = get_string("endofclustertitle", "lesson");
|
||
|
|
if (!$newpageid = insert_record("lesson_pages", $newpage)) {
|
||
|
|
error("Insert page: end of cluster page not inserted");
|
||
|
|
}
|
||
|
|
// update the linked list...
|
||
|
|
if (!set_field("lesson_pages", "nextpageid", $newpageid, "id", $pageid)) {
|
||
|
|
error("Add end of cluster: unable to update link");
|
||
|
|
}
|
||
|
|
if ($page->nextpageid) {
|
||
|
|
// the new page is not the last page
|
||
|
|
if (!set_field("lesson_pages", "prevpageid", $newpageid, "id", $page->nextpageid)) {
|
||
|
|
error("Insert end of cluster: unable to update previous link");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
// ..and the single "answer"
|
||
|
|
$newanswer = new stdClass;
|
||
|
|
$newanswer->lessonid = $lesson->id;
|
||
|
|
$newanswer->pageid = $newpageid;
|
||
|
|
$newanswer->timecreated = $timenow;
|
||
|
|
$newanswer->jumpto = LESSON_NEXTPAGE;
|
||
|
|
if(!$newanswerid = insert_record("lesson_answers", $newanswer)) {
|
||
|
|
error("Add end of cluster: answer record not inserted");
|
||
|
|
}
|
||
|
|
redirect("view.php?id=$cm->id", get_string('addedendofcluster', 'lesson'));
|