refactor constructor generation and test more complex cases

[gitmo/Moo.git] / t / method-generate-constructor.t

diff --git a/t/method-generate-constructor.t b/t/method-generate-constructor.t
index 96d604c..db10020 100644 (file)
--- a/t/method-generate-constructor.t
+++ b/t/method-generate-constructor.t
@@ -3,8 +3,11 @@ use Test::More;
 use Test::Fatal;
 
 use Method::Generate::Constructor;
+use Method::Generate::Accessor;
 
-my $gen = Method::Generate::Constructor->new;
+my $gen = Method::Generate::Constructor->new(
+  accessor_generator => Method::Generate::Accessor->new
+);
 
 $gen->generate_method('Foo', 'new', {
   one => { },