X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F22op_value.t;h=8ccc52b7f3e4837f612de01a5ef44fdd9036b68e;hb=116bc0b69bc3d55647a4e195cf212a6af38ba5b8;hp=2992ff68a38cfa46dabd91bfe9d5f770e60d6fe0;hpb=422ed2ded5bd4317cc7b41094f012d1dec86f4d1;p=scpubgit%2FQ-Branch.git diff --git a/t/22op_value.t b/t/22op_value.t index 2992ff6..8ccc52b 100644 --- a/t/22op_value.t +++ b/t/22op_value.t @@ -14,7 +14,7 @@ for my $col_btype (0,1) { $col_btype ? (bindtype => 'columns') : (), ); - my ($sql, @bind) = $sql_maker->select ('artist', '*', { arr1 => { -value => [1,2] }, arr2 => { '>', { -value => [3,4] } }, field => [5,6] } ); + my ($sql, @bind) = $sql_maker->select('artist', '*', { arr1 => { -value => [1,2] }, arr2 => { '>', { -value => [3,4] } }, field => [5,6] } ); is_same_sql_bind ( $sql, @@ -44,7 +44,7 @@ for my $col_btype (0,1) { { local $SIG{__WARN__} = sub { warn @_ unless $_[0] =~ /Supplying an undefined argument to '(?:NOT )?LIKE'/ }; - ($sql, @bind) = $sql_maker->where ({ + ($sql, @bind) = $sql_maker->where({ c1 => undef, c2 => { -value => undef }, c3 => { '=' => { -value => undef } },