new branch grouped_has_many_join

[dbsrgits/DBIx-Class.git] / t / prefetch / grouped.t

diff --git a/t/prefetch/grouped.t b/t/prefetch/grouped.t
index 8e07612..8c29115 100644 (file)
--- a/t/prefetch/grouped.t
+++ b/t/prefetch/grouped.t
@@ -271,4 +271,16 @@ for ($cd_rs->all) {
   );
 }
 
+{
+    $schema->storage->debug(1);
+    my $cd_rs = $schema->resultset('CD')->search(undef, {
+            distinct => 1,
+            join     => [qw/ tracks /],
+            prefetch => [qw/ artist /],
+        });
+    
+    is($cd_rs->all, 5, 'search with has_many join and distinct ok');
+    $schema->storage->debug(0);
+}
+
 done_testing;