From: Robert Bohne <rbo@cpan.org>
Date: Fri, 14 May 2010 21:55:28 +0000 (+0000)
Subject: Enabled count sub query test, isn't broken anymore
X-Git-Tag: v0.08122~34^2~9
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d815b6a502529d2ba0804d86d25e648d1a0f7631;hp=b75e2132f3b951b2e8e11c9aa649b4ee225c1b05;p=dbsrgits%2FDBIx-Class.git

Enabled count sub query test, isn't broken anymore
---

diff --git a/t/73oracle.t b/t/73oracle.t
index d6e90e3..6c28607 100644
--- a/t/73oracle.t
+++ b/t/73oracle.t
@@ -601,26 +601,26 @@ if ( $schema->storage->isa('DBIx::Class::Storage::DBI::Oracle::Generic') ) {
       # after count_subq, 
       # I will fix this later...
       # 
-      # is_same_sql_bind (
-      #   $rs->count_rs->as_query,
-      #   '( 
-      #       SELECT COUNT( * ) FROM (
-      #           SELECT artistid FROM (
-      #               SELECT artistid, ROWNUM rownum__index FROM (
-      #                   SELECT 
-      #                       me.artistid
-      #                   FROM artist me 
-      #                   START WITH name = ? 
-      #                   CONNECT BY artistid = PRIOR parentid 
-      #               ) me
-      #           ) me 
-      #           WHERE rownum__index BETWEEN 1 AND 2
-      #       ) me
-      #   )',
-      #   [ [ name => 'greatgrandchild' ] ],
-      # );
-      # 
-      # is( $rs->count, 2, 'Connect By; LIMIT count ok' );
+      is_same_sql_bind (
+        $rs->count_rs->as_query,
+        '( 
+            SELECT COUNT( * ) FROM (
+                SELECT artistid FROM (
+                    SELECT artistid, ROWNUM rownum__index FROM (
+                        SELECT 
+                            me.artistid
+                        FROM artist me 
+                        START WITH name = ? 
+                        CONNECT BY parentid = PRIOR artistid
+                    ) me
+                ) me 
+                WHERE rownum__index BETWEEN 1 AND 2
+            ) me
+        )',
+        [ [ name => 'root' ] ],
+      );
+
+      is( $rs->count, 2, 'Connect By; LIMIT count ok' );
     }
 
     # select the whole cycle tree without nocylce