X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fsqlmaker%2Fdbihacks_internals.t;h=f3d240f821d7e5d45366a6c9ff149c73619cfd7c;hb=8acda57c41ff1e2eda847e53b073217cb9035136;hp=7b4506ddd6457eaee9ae30a5259e7734444a75c5;hpb=8d005ad9929e4bf227919cb6374e2a9e9689324f;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/sqlmaker/dbihacks_internals.t b/t/sqlmaker/dbihacks_internals.t
index 7b4506d..f3d240f 100644
--- a/t/sqlmaker/dbihacks_internals.t
+++ b/t/sqlmaker/dbihacks_internals.t
@@ -134,6 +134,27 @@ for my $t (
     sql => 'WHERE artistid IS NULL AND artistid != ? AND artistid IS NULL AND artistid = ? AND 0=1 AND charfield IS NULL AND 0=1 AND rank IS NULL',
     efcc_result => [qw( artistid )],
   },
+
+  # original test from RT#93244
+  {
+    where => {
+      -and => [
+        \[
+          "LOWER(me.title) LIKE ?",
+          '%spoon%',
+        ],
+        [ { 'me.title' => 'Spoonful of bees' } ],
+    ]},
+    cc_result => {
+      '' => \[
+        "LOWER(me.title) LIKE ?",
+        '%spoon%',
+      ],
+      'me.title' => 'Spoonful of bees',
+    },
+    sql => 'WHERE LOWER(me.title) LIKE ? AND me.title = ?',
+    efcc_result => [qw( me.title )],
+  }
 ) {
 
   for my $w (