test: add failing tests for loads not getting added automatically in certain situations (#612)

Author: kernel-io

test/parent_filter_test.exs

@@ -1,7 +1,7 @@
 defmodule AshPostgres.Test.ParentFilterTest do
   use AshPostgres.RepoCase, async: false
 
-  alias AshPostgres.Test.{Organization, Post, User}
+  alias AshPostgres.Test.{Organization, Post, User, Comment}
 
   require Ash.Query
 
@@ -44,4 +44,31 @@ defmodule AshPostgres.Test.ParentFilterTest do
              )
              |> Ash.read(authorize?: false)
   end
+
+  test "something else" do
+    organization =
+      Organization
+      |> Ash.Changeset.for_create(:create, %{name: "test_org"})
+      |> Ash.create!()
+
+    post_in_my_org =
+      Post
+      |> Ash.Changeset.for_create(:create, %{organization_id: organization.id, title: "test_org"})
+      |> Ash.create!()
+
+    Comment
+    |> Ash.Changeset.for_create(:create, %{title: "test_org"})
+    |> Ash.Changeset.manage_relationship(:post, post_in_my_org, type: :append_and_remove)
+    |> Ash.create!()
+
+    assert {:ok, _} =
+             Post
+             |> Ash.Query.for_read(:read)
+             |> Ash.Query.filter(
+               organizations_with_posts_that_have_the_post_title_somewhere_in_their_comments.name in [
+                 ^organization.name
+               ]
+             )
+             |> Ash.read(authorize?: false)
+  end
 end

test/support/resources/post.ex

@@ -614,6 +614,14 @@ defmodule AshPostgres.Test.Post do
       filter(expr(fragment("? = ?", title, parent(organization.name))))
     end
 
+    has_many(
+      :organizations_with_posts_that_have_the_post_title_somewhere_in_their_comments,
+      AshPostgres.Test.Organization
+    ) do
+      no_attributes?(true)
+      filter(expr(fragment("POSITION(? IN ?) > 0", posts.title, parent(concated_comment_titles))))
+    end
+
     has_many(:recommendations, __MODULE__) do
       public?(true)
       no_attributes?(true)
@@ -1020,6 +1028,8 @@ defmodule AshPostgres.Test.Post do
     calculate(:author_profile_description_from_agg, :string, expr(author_profile_description))
 
     calculate(:latest_comment_title, :string, expr(latest_comment.title), allow_nil?: true)
+
+    calculate(:concated_comment_titles, :string, expr(fragment("concat(?)", comment_titles)))
   end
 
   aggregates do