test tweaks

[gitmo/Class-MOP.git] / t / 102_InsideOutClass_test.t

diff --git a/t/102_InsideOutClass_test.t b/t/102_InsideOutClass_test.t
index b8c5d62..a29f00c 100644 (file)
--- a/t/102_InsideOutClass_test.t
+++ b/t/102_InsideOutClass_test.t
@@ -9,7 +9,7 @@ use Scalar::Util 'reftype';
 
 BEGIN { 
     use_ok('Class::MOP');    
-    require_ok(File::Spec->catdir('examples', 'InsideOutClass.pod'));
+    require_ok(File::Spec->catfile('examples', 'InsideOutClass.pod'));
 }
 
 {
@@ -19,8 +19,8 @@ BEGIN {
     use warnings;    
     
     use metaclass (
-        ':attribute_metaclass' => 'InsideOutClass::Attribute',
-        ':instance_metaclass'  => 'InsideOutClass::Instance'
+        'attribute_metaclass' => 'InsideOutClass::Attribute',
+        'instance_metaclass'  => 'InsideOutClass::Instance'
     );
     
     Foo->meta->add_attribute('foo' => (
@@ -56,8 +56,8 @@ BEGIN {
     use strict;
     use warnings;
     use metaclass (     
-        ':attribute_metaclass' => 'InsideOutClass::Attribute',
-        ':instance_metaclass'  => 'InsideOutClass::Instance'
+        'attribute_metaclass' => 'InsideOutClass::Attribute',
+        'instance_metaclass'  => 'InsideOutClass::Instance'
     );
     
     Baz->meta->add_attribute('bling' => (