[Bast-commits] r9300 - DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-05-05 10:08:33 +0100 (Wed, 05 May 2010)
New Revision: 9300

Added:
   DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rno.t
Removed:
   DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rownumberover.t
Log:
Rename test

Copied: DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rno.t (from rev 9283, DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rownumberover.t)
===================================================================
--- DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rno.t	                        (rev 0)
+++ DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rno.t	2010-05-05 09:08:33 UTC (rev 9300)
@@ -0,0 +1,74 @@
+use strict;
+use warnings;
+
+use Test::More;
+use lib qw(t/lib);
+use DBICTest;
+use DBIC::SqlMakerTest;
+
+my $schema = DBICTest->init_schema;
+
+$schema->storage->_sql_maker->limit_dialect ('RowNumberOver');
+
+my $rs_selectas_col = $schema->resultset ('BooksInLibrary')->search ({}, {
+  '+select' => ['owner.name'],
+  '+as' => ['owner.name'],
+  join => 'owner',
+  rows => 1,
+});
+
+is_same_sql_bind(
+  $rs_selectas_col->as_query,
+  '(
+    SELECT  id, source, owner, title, price,
+            owner__name
+      FROM (
+        SELECT  id, source, owner, title, price,
+                owner__name,
+                ROW_NUMBER() OVER( ) AS rno__row__index
+          FROM (
+            SELECT  me.id, me.source, me.owner, me.title, me.price,
+                    owner.name AS owner__name
+              FROM books me
+              JOIN owners owner ON owner.id = me.owner
+            WHERE ( source = ? )
+          ) me
+      ) me
+    WHERE rno__row__index BETWEEN 1 AND 1
+  )',
+  [  [ 'source', 'Library' ] ],
+);
+
+$schema->storage->_sql_maker->quote_char ([qw/ [ ] /]);
+$schema->storage->_sql_maker->name_sep ('.');
+
+my $rs_selectas_rel = $schema->resultset ('BooksInLibrary')->search ({}, {
+  '+select' => ['owner.name'],
+  '+as' => ['owner_name'],
+  join => 'owner',
+  rows => 1,
+});
+
+is_same_sql_bind(
+  $rs_selectas_rel->as_query,
+  '(
+    SELECT  [id], [source], [owner], [title], [price],
+            [owner_name]
+      FROM (
+        SELECT  [id], [source], [owner], [title], [price],
+                [owner_name],
+                ROW_NUMBER() OVER( ) AS [rno__row__index]
+          FROM (
+            SELECT  [me].[id], [me].[source], [me].[owner], [me].[title], [me].[price],
+                    [owner].[name] AS [owner_name]
+              FROM [books] [me]
+              JOIN [owners] [owner] ON [owner].[id] = [me].[owner]
+            WHERE ( [source] = ? )
+          ) [me]
+      ) [me]
+    WHERE [rno__row__index] BETWEEN 1 AND 1
+  )',
+  [ [ 'source', 'Library' ] ],
+);
+
+done_testing;

Deleted: DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rownumberover.t
===================================================================
--- DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rownumberover.t	2010-05-04 08:13:47 UTC (rev 9299)
+++ DBIx-Class/0.08/branches/subqueried_limit_fixes/t/sqlahacks/limit_dialects/rownumberover.t	2010-05-05 09:08:33 UTC (rev 9300)
@@ -1,74 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More;
-use lib qw(t/lib);
-use DBICTest;
-use DBIC::SqlMakerTest;
-
-my $schema = DBICTest->init_schema;
-
-$schema->storage->_sql_maker->limit_dialect ('RowNumberOver');
-
-my $rs_selectas_col = $schema->resultset ('BooksInLibrary')->search ({}, {
-  '+select' => ['owner.name'],
-  '+as' => ['owner.name'],
-  join => 'owner',
-  rows => 1,
-});
-
-is_same_sql_bind(
-  $rs_selectas_col->as_query,
-  '(
-    SELECT  id, source, owner, title, price,
-            owner__name
-      FROM (
-        SELECT  id, source, owner, title, price,
-                owner__name,
-                ROW_NUMBER() OVER( ) AS rno__row__index
-          FROM (
-            SELECT  me.id, me.source, me.owner, me.title, me.price,
-                    owner.name AS owner__name
-              FROM books me
-              JOIN owners owner ON owner.id = me.owner
-            WHERE ( source = ? )
-          ) me
-      ) me
-    WHERE rno__row__index BETWEEN 1 AND 1
-  )',
-  [  [ 'source', 'Library' ] ],
-);
-
-$schema->storage->_sql_maker->quote_char ([qw/ [ ] /]);
-$schema->storage->_sql_maker->name_sep ('.');
-
-my $rs_selectas_rel = $schema->resultset ('BooksInLibrary')->search ({}, {
-  '+select' => ['owner.name'],
-  '+as' => ['owner_name'],
-  join => 'owner',
-  rows => 1,
-});
-
-is_same_sql_bind(
-  $rs_selectas_rel->as_query,
-  '(
-    SELECT  [id], [source], [owner], [title], [price],
-            [owner_name]
-      FROM (
-        SELECT  [id], [source], [owner], [title], [price],
-                [owner_name],
-                ROW_NUMBER() OVER( ) AS [rno__row__index]
-          FROM (
-            SELECT  [me].[id], [me].[source], [me].[owner], [me].[title], [me].[price],
-                    [owner].[name] AS [owner_name]
-              FROM [books] [me]
-              JOIN [owners] [owner] ON [owner].[id] = [me].[owner]
-            WHERE ( [source] = ? )
-          ) [me]
-      ) [me]
-    WHERE [rno__row__index] BETWEEN 1 AND 1
-  )',
-  [ [ 'source', 'Library' ] ],
-);
-
-done_testing;