# Because Mouse::Util is loaded first in all the Mouse sub-modules,
# XS loader is placed here, not in Mouse.pm.
- our $VERSION = '0.50_08';
+ our $VERSION = '0.65';
- my $xs = !(exists $INC{'Mouse/PurePerl.pm'} || $ENV{MOUSE_PUREPERL});
+ my $xs = !(exists $INC{'Mouse/PurePerl.pm'} || $ENV{MOUSE_PUREPERL} || $ENV{PERL_ONLY});
if($xs){
# XXX: XSLoader tries to get the object path from caller's file name
}
# taken from Class/MOP.pm
-my %is_class_loaded_cache;
sub _try_load_one_class {
my $class = shift;
Carp::confess "Invalid class name ($display)";
}
- return undef if $is_class_loaded_cache{$class} ||= is_class_loaded($class);
+ return '' if is_class_loaded($class);
$class =~ s{::}{/}g;
$class .= '.pm';
=head1 VERSION
-This document describes Mouse version 0.50_08
+This document describes Mouse version 0.65
=head1 IMPLEMENTATIONS FOR