test that SQL statement was passed in
Robert Sedlacek [Wed, 26 Aug 2015 16:08:33 +0000 (16:08 +0000)]
t/basic.t

index 9b7550a..db72f38 100644 (file)
--- a/t/basic.t
+++ b/t/basic.t
@@ -57,6 +57,8 @@ subtest 'simple' => sub {
     };
     is scalar(@_COMPLETE), 1, 'single complete call';
     is $_COMPLETE[0][0], 10, 'full count';
+    ok length($_COMPLETE[0][1]), 'SQL was passed';
+    like $_COMPLETE[0][1], qr{SELECT}i, 'SQL contains SELECT';
     $rs->delete;
 };