fix $obj->new

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

diff --git a/t/method-generate-constructor.t b/t/method-generate-constructor.t
index 6a030c8..6299010 100644 (file)
--- a/t/method-generate-constructor.t
+++ b/t/method-generate-constructor.t
@@ -57,4 +57,10 @@ is(
   'hashrefs also supported'
 );
 
+is(
+  exception { $first->new(one => 1, THREE => 3) },
+  undef,
+  'calling ->new on an object works'
+);
+
 done_testing;