mirror of
https://github.com/moodle/moodle.git
synced 2025-01-18 05:58:34 +01:00
f2bb0045d3
large categories and making it easier to move large numbers of courses around. Also cleaned up some of the navigation bars
76 lines
2.5 KiB
PHP
76 lines
2.5 KiB
PHP
<?PHP // $Id$
|
|
// Admin-only code to delete a course utterly
|
|
|
|
require_once("../config.php");
|
|
|
|
require_variable($id); // course id
|
|
optional_variable($delete); // delete confirmation
|
|
|
|
require_login();
|
|
|
|
if (!isadmin()) {
|
|
error("You must be an administrator to use this page.");
|
|
}
|
|
|
|
if (!$site = get_site()) {
|
|
error("Site not found!");
|
|
}
|
|
|
|
$strdeletecourse = get_string("deletecourse");
|
|
$stradministration = get_string("administration");
|
|
$strcategories = get_string("categories");
|
|
|
|
if (! $course = get_record("course", "id", $id)) {
|
|
error("Course ID was incorrect (can't find it)");
|
|
}
|
|
|
|
$category = get_record("course_categories", "id", $course->category);
|
|
|
|
if (! $delete) {
|
|
$strdeletecheck = get_string("deletecheck", "", $course->shortname);
|
|
$strdeletecoursecheck = get_string("deletecoursecheck");
|
|
|
|
|
|
print_header("$site->shortname: $strdeletecheck", $site->fullname,
|
|
"<a href=\"../$CFG->admin/index.php\">$stradministration</a> -> ".
|
|
"<a href=\"index.php\">$strcategories</a> -> ".
|
|
"<a href=\"category.php?id=$course->category\">$category->name</a> -> ".
|
|
"$strdeletecheck");
|
|
|
|
notice_yesno("$strdeletecoursecheck<BR><BR>$course->fullname ($course->shortname)",
|
|
"delete.php?id=$course->id&delete=".md5($course->timemodified),
|
|
"category.php?id=$course->category");
|
|
exit;
|
|
}
|
|
|
|
if ($delete != md5($course->timemodified)) {
|
|
error("The check variable was wrong - try again");
|
|
}
|
|
|
|
// OK checks done, delete the course now.
|
|
$strdeletingcourse = get_string("deletingcourse", "", $course->shortname);
|
|
|
|
print_header("$site->shortname: $strdeletingcourse", $site->fullname,
|
|
"<a href=\"../$CFG->admin/index.php\">$stradministration</a> -> ".
|
|
"<a href=\"index.php\">$strcategories</a> -> ".
|
|
"<a href=\"category.php?id=$course->category\">$category->name</a> -> ".
|
|
"$strdeletingcourse");
|
|
|
|
print_heading($strdeletingcourse);
|
|
|
|
if (!remove_course_contents($course->id)) {
|
|
notify("An error occurred while deleting some of the course contents.");
|
|
}
|
|
|
|
if (!delete_records("course", "id", $course->id)) {
|
|
notify("An error occurred while deleting the main course record.");
|
|
}
|
|
|
|
print_heading( get_string("deletedcourse", "", $course->shortname) );
|
|
|
|
print_continue("category.php?id=$course->category");
|
|
|
|
print_footer();
|
|
|
|
?>
|