diff options
Diffstat (limited to 't/003-methods.t')
| -rw-r--r-- | t/003-methods.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/003-methods.t b/t/003-methods.t index c4c0d5f..b625c02 100644 --- a/t/003-methods.t +++ b/t/003-methods.t @@ -22,5 +22,5 @@ package main; my $foo = Foo->new(a => 'foo', b => 'bar', c => 'baz'); ok($foo->match(concat => 'foobarbaz'), 'match handles methods as well as attributes'); -ok($foo->match(a => qr/o/, concat => sub { length(shift) > 6 }), +ok($foo->match(a => qr/o/, concat => sub { length > 6 }), 'match handles methods as well as attributes'); |