X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01generate.t;h=3e55f1562ede1451ea708867b77eb03a0d3941de;hb=dd2d5bf75d6babe1a963843632343272ac24b768;hp=5437493d1c0b3f96d993a3814d1333aeaaab6d8b;hpb=2d64004f36ccaf869eaa059d153df080e16ff1e4;p=scpubgit%2FQ-Branch.git diff --git a/t/01generate.t b/t/01generate.t index 5437493..3e55f15 100644 --- a/t/01generate.t +++ b/t/01generate.t @@ -726,9 +726,6 @@ for my $lhs (undef, '') { [ foo => "bar", $lhs => \["baz"], bizz => "buzz" ], [ $lhs => \"baz" ], [ $lhs => \["baz"] ], - - # except for this one, that is automagically arrayified - { foo => "bar", -or => { $lhs => \"baz" }, bizz => "buzz" }, ) { push @tests, { func => 'where', @@ -741,6 +738,7 @@ for my $lhs (undef, '') { ## deprecations - sorta worked, likely abused by folks for my $where_arg ( # the arrayref forms of this never worked and throw above + { foo => "bar", -or => { $lhs => \"baz" }, bizz => "buzz" }, { foo => "bar", -and => { $lhs => \"baz" }, bizz => "buzz" }, { foo => "bar", $lhs => \"baz", bizz => "buzz" }, { foo => "bar", $lhs => \["baz"], bizz => "buzz" },