X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F00new.t;h=eac01ee84720b97da9b2f51b2784e41c858dfd0a;hb=145fbfc8e22d81d833a4845a21c48656382ac33f;hp=989a0b2bccb2b4dfab716a4c4d6680cf71996f1c;hpb=96449e8ea5159e5448ebfc81dfa200dc674f366b;p=dbsrgits%2FSQL-Abstract.git

diff --git a/t/00new.t b/t/00new.t
index 989a0b2..eac01ee 100644
--- 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}): ";