aboutsummaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authorRafael Kitover <rkitover@cpan.org>2010-08-04 23:09:54 -0400
committerRafael Kitover <rkitover@cpan.org>2010-08-04 23:09:54 -0400
commit57d1fb144c7288216e33842337a21394703170b5 (patch)
tree1f2d7642b8e24834e537bbcbab406ec8ce08b4ae /t
parent13005566e6870be3ac9c1cd688f1e73b962eedf1 (diff)
downloadmx-alwayscoerce-57d1fb144c7288216e33842337a21394703170b5.tar.gz
mx-alwayscoerce-57d1fb144c7288216e33842337a21394703170b5.zip
support class_has with no isa, with test
Diffstat (limited to 't')
-rw-r--r--t/01-basic.t2
1 files changed, 2 insertions, 0 deletions
diff --git a/t/01-basic.t b/t/01-basic.t
index b203699..f6d017f 100644
--- a/t/01-basic.t
+++ b/t/01-basic.t
@@ -28,6 +28,8 @@ use Test::NoWarnings;
has uncoerced_attr => (is => 'rw', isa => 'Uncoerced');
class_has uncoerced_class_attr => (is => 'rw', isa => 'Uncoerced');
+
+ class_has untyped_class_attr => (is => 'rw');
}
ok( (my $instance = MyClass->new), 'instance' );