From: Peter Rabbitson <ribasushi@cpan.org>
Date: Mon, 29 Jun 2009 08:14:45 +0000 (+0000)
Subject: clearer
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0bdff7697724cd7a858b39ba39d05658aec17c86;p=dbsrgits%2FDBIx-Class-Historic.git

clearer
---

diff --git a/t/prefetch/grouped.t b/t/prefetch/grouped.t
index a0caecd..b44d701 100644
--- a/t/prefetch/grouped.t
+++ b/t/prefetch/grouped.t
@@ -98,10 +98,7 @@ for ($cd_rs->all) {
         JOIN cd cd ON cd.cdid = me.cd
       WHERE ( me.cd IN ( ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ? ) )
     )',
-    [ map
-      { [ 'me.cd' => $_] }
-      ( $cd_rs->get_column ('cdid')->all, $cd_rs->get_column ('cdid')->all )
-    ],
+    [ map { [ 'me.cd' => $_] } ( ($cd_rs->get_column ('cdid')->all) x 2 ) ],
     'next() query generated expected SQL',
   );