tweak the initializer args, document set_initial_value
[gitmo/Class-MOP.git] / t / 024_attribute_initializer.t
index 76e5834..db9aca5 100644 (file)
@@ -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, $callback, $attr) = @_;
           $callback->($value * 2);
         },
     );