Fix deletion not deleting relevant actions.

lib/pleroma/activity.ex

@@ -15,11 +15,17 @@ defmodule Pleroma.Activity do
       where: fragment("(?)->>'id' = ?", activity.data, ^to_string(ap_id)))
   end
 
+  # Wrong name, only returns create activities
   def all_by_object_ap_id_q(ap_id) do
     from activity in Activity,
       where: fragment("(?)->'object'->>'id' = ?", activity.data, ^to_string(ap_id))
   end
 
+  def all_non_create_by_object_ap_id_q(ap_id) do
+    from activity in Activity,
+      where: fragment("(?)->>'object' = ?", activity.data, ^to_string(ap_id))
+  end
+
   def all_by_object_ap_id(ap_id) do
     Repo.all(all_by_object_ap_id_q(ap_id))
   end

lib/pleroma/web/ostatus/handlers/delete_handler.ex

@@ -7,6 +7,7 @@ defmodule Pleroma.Web.OStatus.DeleteHandler do
     with id <- XML.string_from_xpath("//id", entry),
          object when not is_nil(object) <- Object.get_by_ap_id(id) do
       Repo.delete(object)
+      Repo.delete_all(Activity.all_non_create_by_object_ap_id_q(id))
       Repo.delete_all(Activity.all_by_object_ap_id_q(id))
       nil
     end