X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse.pm;h=58637af019e2092769e88b09d62bedcb8beb4e71;hp=59ddd5cbbc84b8ca6f414680255daf1fe202a4e3;hb=9694b71b9fb63978f813900224f556ad62da729f;hpb=262801ef3236bc935538bc2eff263df1368830ec diff --git a/lib/Mouse.pm b/lib/Mouse.pm index 59ddd5c..58637af 100644 --- a/lib/Mouse.pm +++ b/lib/Mouse.pm @@ -83,7 +83,10 @@ do { sub load_class { my $class = shift; - return 0 if ref($class) || !defined($class) || !length($class); + if (ref($class) || !defined($class) || !length($class)) { + my $display = defined($class) ? $class : 'undef'; + confess "Invalid class name ($display)"; + } return 1 if is_class_loaded($class);