X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSQLAHacks%2FMSSQL.pm;h=6472ac38d0a107eacbfddcef5cb05196b55fd800;hb=b563960fb2b331e072f58a135bb69e589f063fe9;hp=70cc8c3ba2efdd377f0f7f9e5fb766d847306291;hpb=584d2dd1ac98a4e46496006b0a655b6e5c5e7ac9;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/SQLAHacks/MSSQL.pm b/lib/DBIx/Class/SQLAHacks/MSSQL.pm index 70cc8c3..6472ac3 100644 --- a/lib/DBIx/Class/SQLAHacks/MSSQL.pm +++ b/lib/DBIx/Class/SQLAHacks/MSSQL.pm @@ -1,28 +1,6 @@ package # Hide from PAUSE DBIx::Class::SQLAHacks::MSSQL; -use base qw( DBIx::Class::SQLAHacks ); -use Carp::Clan qw/^DBIx::Class|^SQL::Abstract/; - -sub _RowNumberOver { - my ($self, $sql, $order, $rows, $offset ) = @_; - - $offset += 1; - my $last = $rows + $offset - 1; - my ( $order_by ) = $self->_order_by( $order ); - - $sql = <<"SQL"; -SELECT * FROM -( - SELECT Q1.*, ROW_NUMBER() OVER( $order_by ) AS ROW_NUM FROM ( - $sql - ) Q1 -) Q2 -WHERE ROW_NUM BETWEEN $offset AND $last - -SQL - - return $sql; -} +use base qw( DBIx::Class::SQLMaker::MSSQL ); 1;