X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F22op_value.t;h=8ccc52b7f3e4837f612de01a5ef44fdd9036b68e;hb=ca4f826a37ccb5194b0b5b9b4190b4007d647d9c;hp=2992ff68a38cfa46dabd91bfe9d5f770e60d6fe0;hpb=0e49a4874db140e947911a9bce927332bdf74e02;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 } },