Test to show top limit grouping problem

diff --git a/t/42toplimit.t b/t/42toplimit.t
index aefbc0c..6f05660 100644 (file)
--- a/t/42toplimit.t
+++ b/t/42toplimit.t
@@ -43,3 +43,10 @@ sub test_order {
       ],\r
       expected_sql_order => ['foo ASC, bar DESC, baz ASC, frew ASC', 'foo DESC, bar ASC, baz DESC, frew DESC']\r
   });\r
+\r
+  is_same_sql(\r
+     $sa->select( 'foo', [qw{ bar baz}], undef, {\r
+           group_by => 'bar',\r
+           order_by => 'bar',\r
+    }, 1, 3),\r
+    "SELECT * FROM ( SELECT TOP 1 * FROM ( SELECT TOP 4 bar,baz FROM foo ORDER BY bar ASC GROUP BY bar ) AS foo ORDER BY bar DESC ) AS bar ORDER BY bar ASC");\r