test tweaks
[gitmo/Class-MOP.git] / t / 108_ArrayBasedStorage_test.t
index 43e079f..efedf25 100644 (file)
@@ -9,7 +9,7 @@ use Scalar::Util 'reftype';
 
 BEGIN {
     use_ok('Class::MOP');
-    require_ok(File::Spec->catdir('examples', 'ArrayBasedStorage.pod'));
+    require_ok(File::Spec->catfile('examples', 'ArrayBasedStorage.pod'));
 }
 
 {