X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F04modifiers.t;fp=t%2F04modifiers.t;h=702c2992c209180eb859aee02a24d2236042c0d0;hb=ca4f826a37ccb5194b0b5b9b4190b4007d647d9c;hp=57519eeff0aa93b86e36124cdf4ca52afedb6686;hpb=0e49a4874db140e947911a9bce927332bdf74e02;p=dbsrgits%2FSQL-Abstract.git diff --git a/t/04modifiers.t b/t/04modifiers.t index 57519ee..702c299 100644 --- a/t/04modifiers.t +++ b/t/04modifiers.t @@ -382,7 +382,7 @@ for my $case (@and_or_tests) { TODO: { local $TODO = $case->{todo} if $case->{todo}; - my $sql = SQL::Abstract->new ($case->{args} || {}); + my $sql = SQL::Abstract->new($case->{args} || {}); my $where_copy = dclone($case->{where}); @@ -406,7 +406,7 @@ for my $case (@nest_tests) { local $SQL::Abstract::Test::parenthesis_significant = 1; - my $sql = SQL::Abstract->new ($case->{args} || {}); + my $sql = SQL::Abstract->new($case->{args} || {}); lives_ok (sub { my ($stmt, @bind) = $sql->where($case->{where}); is_same_sql_bind( @@ -427,7 +427,7 @@ for my $case (@numbered_mods) { my @w; local $SIG{__WARN__} = sub { push @w, @_ }; - my $sql = SQL::Abstract->new ($case->{args} || {}); + my $sql = SQL::Abstract->new($case->{args} || {}); { my ($old_s, @old_b) = $sql->where($case->{backcompat}); my ($new_s, @new_b) = $sql->where($case->{correct});