X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fclauses.t;h=ad56f9586c1c021981b7ccc1fa8cd620036b6bab;hb=de5b83ae6267f8be28e1a1aa08d89288d1f5f5f7;hp=ffdd506eaca51813b87c90b011ddbf6825fa94d1;hpb=48b71e3b7c1fb4e370236037cf914c8034d0ab80;p=scpubgit%2FQ-Branch.git

diff --git a/xt/clauses.t b/xt/clauses.t
index ffdd506..ad56f95 100644
--- 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;