summaryrefslogtreecommitdiff
path: root/lib/VNDB/DB/Users.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/VNDB/DB/Users.pm')
-rw-r--r--lib/VNDB/DB/Users.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/VNDB/DB/Users.pm b/lib/VNDB/DB/Users.pm
index 41f9f25a..b9d66200 100644
--- a/lib/VNDB/DB/Users.pm
+++ b/lib/VNDB/DB/Users.pm
@@ -124,12 +124,17 @@ sub dbUserAdd {
# uid
sub dbUserDel {
my($s, $id) = @_;
+ # TODO: delete/update all those referenced rows using PgSQL reference actions
$s->dbExec($_, $id) for (
q|DELETE FROM rlists WHERE uid = ?|,
q|DELETE FROM wlists WHERE uid = ?|,
q|DELETE FROM votes WHERE uid = ?|,
+ q|DELETE FROM tags_vn WHERE uid = ?|,
q|DELETE FROM sessions WHERE uid = ?|,
+ q|DELETE FROM notifications WHERE uid = ?|,
+ q|UPDATE notifications SET c_byuser = 0 WHERE c_byuser = ?|,
q|UPDATE changes SET requester = 0 WHERE requester = ?|,
+ q|UPDATE tags SET addedby = 0 WHERE addedby = ?|,
q|UPDATE threads_posts SET uid = 0 WHERE uid = ?|,
q|DELETE FROM users WHERE id = ?|
);