[Catalyst-commits] r8549 - Catalyst-Runtime/5.80/trunk/lib/Catalyst

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2008-10-17 05:07:27 +0100 (Fri, 17 Oct 2008)
New Revision: 8549

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/Test.pm
Log:
Use Class::MOP instead of Class::Inspector in Catalyst::Test.

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/Test.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/Test.pm	2008-10-17 01:25:11 UTC (rev 8548)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/Test.pm	2008-10-17 04:07:27 UTC (rev 8549)
@@ -4,7 +4,7 @@
 
 use Catalyst::Exception;
 use Catalyst::Utils;
-use Class::Inspector;
+use Class::MOP;
 use Sub::Exporter;
 
 {
@@ -30,8 +30,8 @@
     } elsif (! $class) {
         $request = sub { Catalyst::Exception->throw("Must specify a test app: use Catalyst::Test 'TestApp'") };
     } else {
-        unless( Class::Inspector->loaded( $class ) ) {
-            require Class::Inspector->filename( $class );
+        unless (Class::MOP::is_class_loaded($class)) {
+            Class::MOP::load_class($class);
         }
         $class->import;