From: Moritz Onken <onken@netcubed.de>
Date: Fri, 29 May 2009 13:41:22 +0000 (+0000)
Subject: added failing test for -desc => \['colA LIKE ?', 'test']
X-Git-Tag: v1.70~155
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=293149c55f1e9066c5e31f703aafc4a109cf0f5a;p=dbsrgits%2FSQL-Abstract.git

added failing test for -desc => \['colA LIKE ?', 'test']
---

diff --git a/t/06order_by.t b/t/06order_by.t
index 71b9dc2..7d2ccf4 100644
--- a/t/06order_by.t
+++ b/t/06order_by.t
@@ -86,6 +86,11 @@ my @cases =
     expects => ' ORDER BY colA ASC, colB DESC, colC ASC, colD ASC',
     expects_quoted => ' ORDER BY `colA` ASC, `colB` DESC, `colC` ASC, `colD` ASC',
    },
+   {
+    given => { -desc => \['colA LIKE ?', 'test'] },
+    expects => ' ORDER BY colA LIKE ? DESC',
+    expects_quoted => ' ORDER BY colA LIKE ? DESC',
+   },
   );