X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F95sql_maker_quote.t;h=0a385dc73087decbc6b5e7e231097b7a58948a41;hb=949172b0fa30a832d268c3f55f97247a10742314;hp=162c59f131dd03aa130eb20aead9d14a02d8b660;hpb=05697a49866d989b22944492ebe7e38c4ddc4da2;p=dbsrgits%2FDBIx-Class.git diff --git a/t/95sql_maker_quote.t b/t/95sql_maker_quote.t index 162c59f..0a385dc 100644 --- a/t/95sql_maker_quote.t +++ b/t/95sql_maker_quote.t @@ -2,7 +2,7 @@ use strict; use warnings; use Test::More; -use SQL::Abstract::Test import => ['is_same_sql_bind']; +use DBIC::SqlMakerTest; BEGIN { @@ -237,27 +237,31 @@ is_same_sql_bind( 'quoted table names for UPDATE' ); +SKIP: { + skip 1, "select attr with star does not work in SQL::Abstract < 1.49" + if $SQL::Abstract::VERSION < 1.49; -($sql, @bind) = $sql_maker->select( - [ - { - 'me' => 'cd' - } - ], - [ - 'me.*' - ], - undef, - [], - undef, - undef -); + ($sql, @bind) = $sql_maker->select( + [ + { + 'me' => 'cd' + } + ], + [ + 'me.*' + ], + undef, + [], + undef, + undef + ); -is_same_sql_bind( - $sql, \@bind, - q/SELECT `me`.* FROM `cd` `me`/, [], - 'select attr with me.* is right' -); + is_same_sql_bind( + $sql, \@bind, + q/SELECT `me`.* FROM `cd` `me`/, [], + 'select attr with me.* is right' + ); +} $sql_maker->quote_char([qw/[ ]/]);