Re: [Dbix-class] multiple has_many rels in prefetch not supported in 0.081?

[Moritz Onken]

Forgot the DBIC patch

Index: /Users/mo/Documents/workspace/DBIx-Class/lib/DBIx/Class/ 
ResultSource.pm
===================================================================
--- /Users/mo/Documents/workspace/DBIx-Class/lib/DBIx/Class/ 
ResultSource.pm	(revision 4784)
+++ /Users/mo/Documents/workspace/DBIx-Class/lib/DBIx/Class/ 
ResultSource.pm	(working copy)
@@ -906,15 +906,15 @@
         "Can't prefetch has_many ${pre} (join cond too complex)")
         unless ref($rel_info->{cond}) eq 'HASH';
       my $dots = @{[$as_prefix =~ m/\./g]} + 1; # +1 to match the ".$ 
{as_prefix}"
-      if (my ($fail) = grep { @{[$_ =~ m/\./g]} == $dots }
-                         keys %{$collapse}) {
-        my ($last) = ($fail =~ /([^\.]+)$/);
-        $self->throw_exception(
-          "Can't prefetch multiple has_many rels ${last} and ${pre}"
-          .(length($as_prefix) ? "at the same level (${as_prefix})"
-                               : "at top level"
-        ));
-      }
+      # if (my ($fail) = grep { @{[$_ =~ m/\./g]} == $dots }
+      #                    keys %{$collapse}) {
+      #   my ($last) = ($fail =~ /([^\.]+)$/);
+      #   $self->throw_exception(
+      #     "Can't prefetch multiple has_many rels ${last} and ${pre}"
+      #     .(length($as_prefix) ? "at the same level (${as_prefix})"
+      #                          : "at top level"
+      #   ));
+      # }
       #my @col = map { (/^self\.(.+)$/ ? ("${as_prefix}.$1") : ()); }
       #              values %{$rel_info->{cond}};
       $collapse->{".${as_prefix}${pre}"} = [ $rel_source- 
>primary_columns ];


_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[EMAIL PROTECTED]