the repository now lives at https://github.com/moose/MooseX-ClassAttributes

[gitmo/MooseX-ClassAttribute.git] / t / 03-introspection.t

diff --git a/t/03-introspection.t b/t/03-introspection.t
index 8c340d3..dee90d1 100644 (file)
--- a/t/03-introspection.t
+++ b/t/03-introspection.t
@@ -3,7 +3,7 @@ use warnings;
 
 use lib 't/lib';
 
-use Test::More tests => 14;
+use Test::More;
 
 # We just want the class definitions in here.
 use SharedTests;
@@ -15,8 +15,8 @@ ok(
 
 ok(
     HasClassAttribute->meta()->get_class_attribute('ObjectCount')->meta()
-        ->does_role('MooseX::ClassAttribute::Role::Meta::Attribute'),
-    'get_class_attribute_list returns an object which does the MooseX::ClassAttribute::Role::Meta::Attribute role'
+        ->does_role('MooseX::ClassAttribute::Trait::Attribute'),
+    'get_class_attribute_list returns an object which does the MooseX::ClassAttribute::Trait::Attribute role'
 );
 
 my @ca = qw( Delegatee
@@ -29,6 +29,7 @@ my @ca = qw( Delegatee
     Built
     LazyBuilt
     Triggerish
+    TriggerRecord
 );
 
 is_deeply(
@@ -103,3 +104,5 @@ ok(
     !Child->meta()->has_class_attribute_value('YetAnotherAttribute'),
     'Child does not have a class attribute value for YetAnotherAttribute'
 );
+
+done_testing();