From ba4e862f0e637237c5d4439a8798c691cade0e69 Mon Sep 17 00:00:00 2001 From: doy Date: Sat, 6 Dec 2008 21:52:59 -0500 Subject: just test truth/falseness for any_match --- t/100-collection.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't') diff --git a/t/100-collection.t b/t/100-collection.t index 68dcec1..9c406e7 100644 --- a/t/100-collection.t +++ b/t/100-collection.t @@ -53,7 +53,7 @@ push @{ $foos->foos }, $foo2; push @{ $foos->foos }, $foo3; is($foos->first_match(a => ''), $foo2, 'first_match works'); -is($foos->any_match('!b' => qr/z/), (), +ok(!$foos->any_match(b => qr/z/), 'any_match works'); is_deeply([shallow($foo2), shallow($foo3)], set($foos->grep_matches(c => qr/o/)), 'grep_matches works'); -- cgit v1.2.3-54-g00ecf