Forgot to fix the test count

[gitmo/Moose.git] / t / 030_roles / 034_create_role.t

diff --git a/t/030_roles/034_create_role.t b/t/030_roles/034_create_role.t
index 8c1df50..8c1eb4e 100644 (file)
--- a/t/030_roles/034_create_role.t
+++ b/t/030_roles/034_create_role.t
@@ -5,7 +5,7 @@ use Test::More tests => 4;
 use Moose ();
 
 my $role = Moose::Meta::Role->create(
-    'package' => 'MyItem::Role::Equipment',
+    'MyItem::Role::Equipment',
     attributes => {
         is_worn => {
             is => 'rw',
@@ -21,7 +21,7 @@ my $class = Moose::Meta::Class->create('MyItem::Armor::Helmet' =>
     roles => ['MyItem::Role::Equipment'],
 );
 
-my $visored = $class->construct_instance(is_worn => 0);
+my $visored = $class->new_object(is_worn => 0);
 ok(!$visored->is_worn, "attribute, accessor was consumed");
 $visored->is_worn(1);
 ok($visored->is_worn, "accessor was consumed");