Converted all test cases where the tests are queued in an array to calculate the...

[scpubgit/Q-Branch.git] / t / 00new.t

diff --git a/t/00new.t b/t/00new.t
index 989a0b2..eac01ee 100644 (file)
--- a/t/00new.t
+++ b/t/00new.t
@@ -4,18 +4,10 @@ use strict;
 use warnings;
 use Test::More;
 
-use FindBin;
-use lib "$FindBin::Bin";
-use TestSqlAbstract;
-
-
-plan tests => 15;
-
-use_ok('SQL::Abstract');
+use SQL::Abstract::Test import => ['is_same_sql_bind'];
 
 #LDNOTE: renamed all "bind" into "where" because that's what they are
 
-
 my @handle_tests = (
       #1
       {
@@ -113,6 +105,11 @@ my @handle_tests = (
       },
 );
 
+
+plan tests => (1 + scalar(@handle_tests));
+
+use_ok('SQL::Abstract');
+
 for (@handle_tests) {
   local $" = ', ';
   #print "creating a handle with args ($_->{args}): ";