Move the AST walking code out into seperate class

[dbsrgits/SQL-Abstract-2.0-ish.git] / t / 001_basic.t

diff --git a/t/001_basic.t b/t/001_basic.t
index a482a6d..ce0bb8f 100644 (file)
--- a/t/001_basic.t
+++ b/t/001_basic.t
@@ -6,7 +6,8 @@ use Test::Differences;
 
 use_ok('SQL::Abstract') or BAIL_OUT( "$@" );
 
-my $sqla = SQL::Abstract->new(ast_version => 1);
+# TODO: once MXMS supports %args, use that here
+my $sqla = SQL::Abstract->create(1);
 is $sqla->dispatch( [ -name => qw/me id/]), "me.id",
   "Simple name generator";