X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSQLMaker%2FLimitDialects.pm;h=1c304363557e63905abd9e49c0d2a1ecd0137eb2;hb=4376a1574bc5b25f4b9160e8fc3ce329ae226e0f;hp=294c57924784ee4da0c52ea069e3d8a06c6d84f0;hpb=50261284a5486d1974adb202eb84e5ed782d3665;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/SQLMaker/LimitDialects.pm b/lib/DBIx/Class/SQLMaker/LimitDialects.pm index 294c579..1c30436 100644 --- a/lib/DBIx/Class/SQLMaker/LimitDialects.pm +++ b/lib/DBIx/Class/SQLMaker/LimitDialects.pm @@ -347,7 +347,7 @@ sub _Top { ? $requested_order : [ map { "$rs_attrs->{alias}.$_" } - ( $rs_attrs->{_rsroot_source_handle}->resolve->_pri_cols ) + ( $rs_attrs->{_rsroot_rsrc}->_pri_cols ) ] ); @@ -481,7 +481,7 @@ Currently used by B, due to lack of any other option. sub _GenericSubQ { my ($self, $sql, $rs_attrs, $rows, $offset) = @_; - my $root_rsrc = $rs_attrs->{_rsroot_source_handle}->resolve; + my $root_rsrc = $rs_attrs->{_rsroot_rsrc}; my $root_tbl_name = $root_rsrc->name; # mangle the input sql as we will be replacing the selector