use inc::Module::Install;
# for co-developpers
-use Module::Install::XSUtil 0.17;
+use Module::Install::XSUtil 0.21;
system($^X, 'tool/generate-mouse-tiny.pl', 'lib/Mouse/Tiny.pm') == 0
or warn "Cannot generate Mouse::Tiny: $!";
recommends 'Class::C3';
}
-require 'lib/Mouse/Spec.pm'; # for the version
-
-if(Mouse::Spec->MouseVersion =~ /_/){ # DEVEL RELEASE
- require Carp::Always; Carp::Always->import();
- include_deps 'Carp::Always';
+my %suggests = (
+ 'Class::Method::Modifiers::Fast' => 0.041,
+ 'MouseX::AttributeHelpers' => 0.06,
+);
+
+while(my($mod, $least) = each %suggests){
+ if(can_use($mod)){
+ if(!eval { $mod->VERSION($least) }){
+ my $ver = $mod->VERSION;
+ warn("\n",
+ "WARNING: $mod is installed, but its version ($ver) is too old (< $least).\n",
+ " Please update $mod after installation of Mouse.\n",
+ "\n"
+ );
+ }
+ }
}
-my $use_xs;
-
-if($] < 5.008_001){
- $use_xs = 0;
-}
+require 'lib/Mouse/Spec.pm'; # for the version
-for (@ARGV) {
- /^--pp$/ and $use_xs = 0;
- /^--xs$/ and $use_xs = 1;
-}
+#if(Mouse::Spec->MouseVersion =~ /_/){ # DEVEL RELEASE
+# require Carp::Always; Carp::Always->import();
+# include_deps 'Carp::Always';
+#}
-if(!defined $use_xs){
- $use_xs = cc_available();
-}
+# cc_available recognizes the '--pp' and '--xs' options
+my $use_xs = ($] >= 5.008_001 && cc_available());
if($use_xs){
print "Mouse configured with XS.\n",
"NOTE: You can try --pp option to configure Mouse with Pure Perl.\n";
- use_ppport(3.19);
cc_warnings();
+ use_ppport(3.19);
cc_src_paths('xs-src');
}
else{