clean up clauses test

[scpubgit/Q-Branch.git] / xt / clauses.t

diff --git a/xt/clauses.t b/xt/clauses.t
index ffdd506..ad56f95 100644 (file)
--- a/xt/clauses.t
+++ b/xt/clauses.t
@@ -2,9 +2,12 @@ use strict;
 use warnings;
 use Test::More;
 use SQL::Abstract::Test import => [ qw(is_same_sql_bind is_same_sql) ];
+use SQL::Abstract;
 use SQL::Abstract::ExtraClauses;
 
-my $sqlac = SQL::Abstract::ExtraClauses->new(unknown_unop_always_func => 1);
+my $sqlac = SQL::Abstract->new;
+
+SQL::Abstract::ExtraClauses->apply_to($sqlac);
 
 is_deeply(
   [ $sqlac->statement_list ],
@@ -472,6 +475,4 @@ is_same_sql_bind(
     )]
 );
 
-
-
 done_testing;