add a test for direct check
[gitmo/MooseX-Types.git] / t / 22_class_type.t
index 2fdf560..091eba0 100644 (file)
@@ -31,4 +31,6 @@ ok(my $o = ClassyClassConsumer->new, "Constructor happy");
 
 is(ref($o->om_nom), 'ClassyClass', 'Attribute happy');
 
+ok(ClassyClassConsumer->new(om_nom => ClassyClass->new), 'Constructor happy');
+
 done_testing;