From 173adffa82fdfb8cd2757dcdcad53f244a2ba026 Mon Sep 17 00:00:00 2001
From: Dan Helfman <witten@torsion.org>
Date: Thu, 29 May 2008 14:01:22 -0700
Subject: [PATCH] Updated to also reap group-related data.

---
 model/reap.sql | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)

diff --git a/model/reap.sql b/model/reap.sql
index fe1b86b..b4594f2 100644
--- a/model/reap.sql
+++ b/model/reap.sql
@@ -91,6 +91,21 @@ where
   and
     notebook.revision < now() - interval '1 week';
 
+-- Delete old group revisions.
+delete from
+  luminotes_group
+where
+  revision not in (
+    SELECT
+      max( sub_group.revision ) as max
+    from
+      luminotes_group sub_group
+    where
+      sub_group.id = luminotes_group.id
+  )
+  and
+    luminotes_group.revision < now() - interval '1 week';
+
 -- Delete old user revisions.
 delete from
   luminotes_user
@@ -114,4 +129,28 @@ where
     select id from notebook_current
   );
 
+-- Delete permissions for users that no longer exist.
+delete from
+  user_notebook
+where
+  user_id not in (
+    select id from luminotes_user_current
+  );
+
+-- Delete memberships to groups that no longer exist.
+delete from
+  user_group
+where
+  group_id not in (
+    select id from luminotes_group_current
+  );
+
+-- Delete memberships of users that no longer exist.
+delete from
+  user_group
+where
+  user_id not in (
+    select id from luminotes_user_current
+  );
+
 vacuum analyze;