From 082e3ebc4f382698894c8d75b27d0dae0d6e54e5 Mon Sep 17 00:00:00 2001
From: moodler <moodler>
Date: Sun, 15 Feb 2004 05:08:00 +0000
Subject: [PATCH] WHen emptying a course, delete groups and events

---
 lib/moodlelib.php | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/lib/moodlelib.php b/lib/moodlelib.php
index e1e38b9cc9..bb122e90cd 100644
--- a/lib/moodlelib.php
+++ b/lib/moodlelib.php
@@ -973,6 +973,37 @@ function remove_course_contents($courseid, $showfeedback=true) {
         $result = false;
     }
 
+    // Delete any groups
+
+    if ($groups = get_records("groups", "courseid", $course->id)) {
+        foreach ($groups as $group) {
+            if (delete_records("groups_members", "groupid", $group->id)) {
+                if ($showfeedback) {
+                    notify("$strdeleted groups_members");
+                }
+            } else {
+                $result = false;
+            }
+            if (delete_records("groups", "id", $group->id)) {
+                if ($showfeedback) {
+                    notify("$strdeleted groups");
+                }
+            } else {
+                $result = false;
+            }
+        }
+    }
+
+    // Delete events
+
+    if (delete_records("event", "courseid", $course->id)) {
+        if ($showfeedback) {
+            notify("$strdeleted event");
+        }
+    } else {
+        $result = false;
+    }
+
     // Delete logs
 
     if (delete_records("log", "course", $course->id)) {
-- 
2.39.5