projects
/
gitmo/MooseX-AlwaysCoerce.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
support class_has with no isa, with test
[gitmo/MooseX-AlwaysCoerce.git]
/
t
/
01-basic.t
diff --git
a/t/01-basic.t
b/t/01-basic.t
index
b203699
..
f6d017f
100644
(file)
--- 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' );