projects
/
gitmo/Class-MOP.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
give the initializer a test
[gitmo/Class-MOP.git]
/
t
/
024_attribute_initializer.t
diff --git
a/t/024_attribute_initializer.t
b/t/024_attribute_initializer.t
index
76e5834
..
cf39b7a
100644
(file)
--- a/
t/024_attribute_initializer.t
+++ b/
t/024_attribute_initializer.t
@@
-25,7
+25,7
@@
This checks that the initializer is used to set the initial value.
reader => 'get_bar',
writer => 'set_bar',
initializer => sub {
- my ($self, $value, $callback) = @_;
+ my ($self, $value, $name, $callback) = @_;
$callback->($value * 2);
},
);