From: Prog Rammer <prammer1@gmail.com>
Date: Fri, 7 Sep 2012 17:56:23 +0000 (-0500)
Subject: SELECT a, b FROM foo
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b3711d146051750010c648321def1ef55a414355;p=dbsrgits%2FData-Query.git

SELECT a, b FROM foo
---

diff --git a/t/expr-helpers.t b/t/expr-helpers.t
index 5d413b5..4629deb 100644
--- a/t/expr-helpers.t
+++ b/t/expr-helpers.t
@@ -97,3 +97,8 @@ dq_sql_is
   ),
   [ 'SELECT * FROM foo WHERE ( x BETWEEN ? AND ? )', map binding($_), 1, 2 ],
   'between';
+
+dq_sql_is
+  Select([ map Identifier($_), qw(a b) ], Identifier('foo')),
+  ['SELECT a, b FROM foo'],
+  'select columns';