From a99d66b68f4df157a205b0cbb634aefd3039eea0 Mon Sep 17 00:00:00 2001
From: Thomas Citharel <tcit@tcit.fr>
Date: Fri, 1 Apr 2022 12:09:23 +0200
Subject: [PATCH] Fix group deletion caused by foreign keys issue with comments
 & discussions

Closes #1016

Signed-off-by: Thomas Citharel <tcit@tcit.fr>
---
 lib/service/actor_suspension.ex | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/lib/service/actor_suspension.ex b/lib/service/actor_suspension.ex
index 1b6272a67..96977ead0 100644
--- a/lib/service/actor_suspension.ex
+++ b/lib/service/actor_suspension.ex
@@ -190,6 +190,29 @@ defmodule Mobilizon.Service.ActorSuspension do
 
   defp delete_discussions(%Multi{} = multi, %Actor{type: :Group, id: actor_id}) do
     Logger.debug("Delete group's discussions")
+
+    multi =
+      Multi.run(multi, :group_discussion_comments, fn _, _ ->
+        group_comments_ids =
+          Comment
+          |> join(:inner, [c], d in Discussion, on: c.discussion_id == d.id)
+          |> where([_c, d], d.actor_id == ^actor_id)
+          |> select([c], [c.id])
+          |> Repo.all()
+          |> Enum.concat()
+
+        {:ok, group_comments_ids}
+      end)
+
+    multi =
+      Multi.delete_all(
+        multi,
+        :delete_discussions_comments,
+        fn %{group_discussion_comments: group_discussion_comments} ->
+          where(Comment, [c], c.id in ^group_discussion_comments)
+        end
+      )
+
     Multi.delete_all(multi, :delete_discussions, where(Discussion, [e], e.actor_id == ^actor_id))
   end