projects
/
gitmo/Moo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
demonstrate MooX:: implementation
[gitmo/Moo.git]
/
t
/
accessor-coerce.t
diff --git
a/t/accessor-coerce.t
b/t/accessor-coerce.t
index
804a3d0
..
d3a41e1
100644
(file)
--- a/
t/accessor-coerce.t
+++ b/
t/accessor-coerce.t
@@
-192,10
+192,10
@@
run_with_default_for 'Foo3';
has plus_three => (
is => 'rw',
default => sub { 1 },
- coerce => quote_sub q{
+ coerce => quote_sub(q{
my ($x) = @_;
$x + 3
- },
+ }),
lazy => 1,
);
}