X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F043_instance_metaclass_incompatibility.t;h=3e64164dbbaf426cd37edd02c6ccbc5ad70f81eb;hb=81c8a65bf02bb1b0e240d8f5b626b0ceabf9a37c;hp=9c53486ee298e94705032cd1e2d300757098a7f1;hpb=fdbdb5e6eb0e4f6c54629f0bde376aba5e69df14;p=gitmo%2FClass-MOP.git

diff --git a/t/043_instance_metaclass_incompatibility.t b/t/043_instance_metaclass_incompatibility.t
index 9c53486..3e64164 100644
--- a/t/043_instance_metaclass_incompatibility.t
+++ b/t/043_instance_metaclass_incompatibility.t
@@ -24,14 +24,14 @@ BEGIN {
 $@ = undef;
 eval {
     package Foo;
-    metaclass->import(':instance_metaclass' => 'Foo::Meta::Instance');
+    metaclass->import('instance_metaclass' => 'Foo::Meta::Instance');
 };
 ok(!$@, '... Foo.meta => Foo::Meta is compatible') || diag $@;
 
 $@ = undef;
 eval {
     package Bar;
-    metaclass->import(':instance_metaclass' => 'Bar::Meta::Instance');
+    metaclass->import('instance_metaclass' => 'Bar::Meta::Instance');
 };
 ok(!$@, '... Bar.meta => Bar::Meta is compatible') || diag $@;
 
@@ -39,7 +39,7 @@ $@ = undef;
 eval {
     package Foo::Foo;
     use base 'Foo';
-    metaclass->import(':instance_metaclass' => 'Bar::Meta::Instance');
+    metaclass->import('instance_metaclass' => 'Bar::Meta::Instance');
 };
 ok($@, '... Foo::Foo.meta => Bar::Meta is not compatible') || diag $@;
 
@@ -47,7 +47,7 @@ $@ = undef;
 eval {
     package Bar::Bar;
     use base 'Bar';
-    metaclass->import(':instance_metaclass' => 'Foo::Meta::Instance');    
+    metaclass->import('instance_metaclass' => 'Foo::Meta::Instance');    
 };
 ok($@, '... Bar::Bar.meta => Foo::Meta is not compatible') || diag $@;
 
@@ -55,7 +55,7 @@ $@ = undef;
 eval {
     package FooBar;
     use base 'Foo';
-    metaclass->import(':instance_metaclass' => 'FooBar::Meta::Instance');    
+    metaclass->import('instance_metaclass' => 'FooBar::Meta::Instance');    
 };
 ok(!$@, '... FooBar.meta => FooBar::Meta is compatible') || diag $@;
 
@@ -63,7 +63,7 @@ $@ = undef;
 eval {
     package FooBar2;
     use base 'Bar';
-    metaclass->import(':instance_metaclass' => 'FooBar::Meta::Instance');    
+    metaclass->import('instance_metaclass' => 'FooBar::Meta::Instance');    
 };
 ok(!$@, '... FooBar2.meta => FooBar::Meta is compatible') || diag $@;