Move IO::Compress from ext/ to cpan/

[p5sagit/p5-mst-13.2.git] / t / mro / vulcan_c3.t

diff --git a/t/mro/vulcan_c3.t b/t/mro/vulcan_c3.t
index 9ac1c45..f0fffde 100644 (file)
--- a/t/mro/vulcan_c3.t
+++ b/t/mro/vulcan_c3.t
@@ -2,15 +2,8 @@
 
 use strict;
 use warnings;
-BEGIN {
-    unless (-d 'blib') {
-        chdir 't' if -d 't';
-        @INC = '../lib';
-    }
-}
 
-use Test::More tests => 1;
-use mro;
+require q(./test.pl); plan(tests => 1);
 
 =pod
 
@@ -67,7 +60,7 @@ example taken from: L<http://gauss.gwydiondylan.org/books/drm/drm_50.html>
     use base ('Intelligent', 'Humanoid');
 }
 
-is_deeply(
+ok(eq_array(
     mro::get_linear_isa('Vulcan'),
-    [ qw(Vulcan Intelligent Sentient Humanoid BiPedal LifeForm Object) ],
-    '... got the right MRO for the Vulcan Dylan Example');  
+    [ qw(Vulcan Intelligent Sentient Humanoid BiPedal LifeForm Object) ]
+), '... got the right MRO for the Vulcan Dylan Example');