From: Prog Rammer <prammer1@gmail.com>
Date: Mon, 27 Aug 2012 16:25:52 +0000 (-0500)
Subject: left outer join
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=df8418af062422c86bfe32a29cf8a25083ae132d;p=dbsrgits%2FData-Query.git

left outer join
---

diff --git a/t/expr-helpers.t b/t/expr-helpers.t
index 76fc0ba..3bd489e 100644
--- a/t/expr-helpers.t
+++ b/t/expr-helpers.t
@@ -28,7 +28,7 @@ dq_sql_is
     Join(
       Select([ Identifier('*') ], Identifier('foo')),
       Identifier('bar'),
-      perl_operator('==', Identifier('foo', 'x'), Identifier('bar', 'y'))
+      perl_operator('==', Identifier('foo', 'x'), Identifier('bar', 'y')),
     ),
     ['SELECT * FROM foo JOIN bar ON foo.x = bar.y'],
     'join on with dots (Join Select)';
@@ -39,7 +39,7 @@ dq_sql_is
       Join(
         Identifier('foo'),
         Identifier('bar'),
-        perl_operator('==', Identifier('foo', 'x'), Identifier('bar', 'y'))
+        perl_operator('==', Identifier('foo', 'x'), Identifier('bar', 'y')),
       ),
     ),
     ['SELECT * FROM foo JOIN bar ON foo.x = bar.y'],
@@ -66,3 +66,16 @@ dq_sql_is
   ['SELECT * FROM foo GROUP BY x'],
   'simple group by';
 
+
+dq_sql_is
+  Select(
+    [ Identifier('*') ],
+    Join(
+      Identifier('foo'),
+      Identifier('bar'),
+      perl_operator('==', Identifier('foo', 'x'), Identifier('bar', 'y')),
+      'left outer',
+    ),
+  ),
+  ['SELECT * FROM foo LEFT OUTER JOIN bar ON foo.x = bar.y'],
+  'left outer join';