X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FImaDBI.pm;h=49fc1e01c2a930543a9668d6b56ee5f6eea8f456;hb=d4daee7b54e38e4b3d3d0a77759bddc1a4ede6e5;hp=7a3b4f00a995655dad0132f0cc8dc84fe4fc191b;hpb=5e85c6715197a71ec9bd016992e4e05ae90b14ce;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/CDBICompat/ImaDBI.pm b/lib/DBIx/Class/CDBICompat/ImaDBI.pm index 7a3b4f0..49fc1e0 100644 --- a/lib/DBIx/Class/CDBICompat/ImaDBI.pm +++ b/lib/DBIx/Class/CDBICompat/ImaDBI.pm @@ -55,11 +55,11 @@ __PACKAGE__->mk_classdata('_transform_sql_handlers' => $self->throw_exception( "No relationship to JOIN from ${from_class} to ${to_class}" ) unless $rel_obj; my $join = $from_class->storage->sql_maker->_join_condition( - $from_class->result_source_instance->resolve_condition( + $from_class->result_source_instance->_resolve_condition( $rel_obj->{cond}, $to, $from) ); return $join; } - + } ); sub db_Main { @@ -115,7 +115,7 @@ sub sth_to_objects { sub transform_sql { my ($class, $sql, @args) = @_; - + my $tclass = $class->sql_transformer_class; $class->ensure_class_loaded($tclass); my $t = $tclass->new($class, $sql, @args);