From: Florian Ragwitz <rafl@debian.org>
Date: Fri, 17 Oct 2008 04:07:40 +0000 (+0000)
Subject: Stop using Class::Inspector in the testsuite.
X-Git-Tag: 5.8000_03~24
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=b40d0b9e730bfb853665b90ba25d889f7bc9a163

Stop using Class::Inspector in the testsuite.
---

diff --git a/Makefile.PL b/Makefile.PL
index 7aec347..7b48560 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -32,7 +32,6 @@ requires 'Text::Balanced'; # core in 5.8.x but mentioned for completeness
 requires 'MRO::Compat';
 
 test_requires 'NEXT';
-test_requires 'Class::Inspector';
 test_requires 'Class::Data::Inheritable';
 
 if (   ( exists $ENV{AGGREGATE_TESTS} && !$ENV{AGGREGATE_TESTS})
diff --git a/t/unit_utils_load_class.t b/t/unit_utils_load_class.t
index f8ce296..d23ca1c 100644
--- a/t/unit_utils_load_class.t
+++ b/t/unit_utils_load_class.t
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Test::More tests => 16;
-use Class::Inspector;
+use Class::MOP;
 
 use lib "t/lib";
 
@@ -18,11 +18,11 @@ BEGIN { use_ok("Catalyst::Utils") };
 my $warnings = 0;
 $SIG{__WARN__} = sub { $warnings++ };
 
-ok( !Class::Inspector->loaded("TestApp::View::Dump"), "component not yet loaded" );
+ok( !Class::MOP::is_class_loaded("TestApp::View::Dump"), "component not yet loaded" );
 
 Catalyst::Utils::ensure_class_loaded("TestApp::View::Dump");
 
-ok( Class::Inspector->loaded("TestApp::View::Dump"), "loaded ok" );
+ok( Class::MOP::is_class_loaded("TestApp::View::Dump"), "loaded ok" );
 is( $warnings, 0, "no warnings emitted" );
 
 $warnings = 0;
@@ -30,10 +30,10 @@ $warnings = 0;
 Catalyst::Utils::ensure_class_loaded("TestApp::View::Dump");
 is( $warnings, 0, "calling again doesn't reaload" );
 
-ok( !Class::Inspector->loaded("TestApp::View::Dump::Request"), "component not yet loaded" );
+ok( !Class::MOP::is_class_loaded("TestApp::View::Dump::Request"), "component not yet loaded" );
 
 Catalyst::Utils::ensure_class_loaded("TestApp::View::Dump::Request");
-ok( Class::Inspector->loaded("TestApp::View::Dump::Request"), "loaded ok" );
+ok( Class::MOP::is_class_loaded("TestApp::View::Dump::Request"), "loaded ok" );
 
 is( $warnings, 0, "calling again doesn't reaload" );