X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FUtils.pm;h=9fd9c324242ec021d35f7c0219128306448f0a53;hp=d27fa9c5e83c7dedc153261735c660f461257c4f;hb=fbedfd6b5429958bd65800beef2951db97ea50f2;hpb=7dd4f037dd4bcf9b56e4e84050ab2bce19aebd4a diff --git a/lib/Catalyst/Utils.pm b/lib/Catalyst/Utils.pm index d27fa9c..9fd9c32 100644 --- a/lib/Catalyst/Utils.pm +++ b/lib/Catalyst/Utils.pm @@ -6,7 +6,6 @@ use File::Spec; use HTTP::Request; use Path::Class; use URI; -use Class::Inspector; use Carp qw/croak/; use Cwd; @@ -261,7 +260,9 @@ sub ensure_class_loaded { if $class =~ m/\.pm$/; return if !$opts->{ ignore_loaded } - && Class::Inspector->loaded( $class ); # if a symbol entry exists we don't load again + && Class::MOP::is_class_loaded($class); # if a symbol entry exists we don't load again + + # as soon as Class::MOP 0.67 + 1 is released Class::MOP::load_class($class) can be used instead # this hack is so we don't overwrite $@ if the load did not generate an error my $error; @@ -274,8 +275,9 @@ sub ensure_class_loaded { } die $error if $error; + die "require $class was successful but the package is not defined" - unless Class::Inspector->loaded($class); + unless Class::MOP::is_class_loaded($class); return 1; }