add a test for direct check
Matt S Trout [Fri, 18 May 2012 13:17:28 +0000 (13:17 +0000)]
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;