X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=Makefile.PL;h=66236284379079d1e9eb90961577b2cc382696bf;hp=6e438d70cb4d3a28a90049f689142fbc67d791f0;hb=134f7bcb2b50fa3d9751712d93885c618bf24ccb;hpb=a1d1c5cc366a1881fe5ed25c0f7b3eb60999854d

diff --git a/Makefile.PL b/Makefile.PL
index 6e438d7..6623628 100755
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -3,7 +3,7 @@ use warnings;
 use inc::Module::Install;
 
 # for co-developpers
-use Module::Install::XSUtil 0.19;
+use Module::Install::XSUtil 0.21;
 
 system($^X, 'tool/generate-mouse-tiny.pl', 'lib/Mouse/Tiny.pm') == 0
     or warn "Cannot generate Mouse::Tiny: $!";
@@ -25,14 +25,31 @@ if($] < 5.010) {
     recommends 'Class::C3';
 }
 
-if(eval{ require MouseX::AttributeHelpers }){
-    if(!eval{ MouseX::AttributeHelpers->VERSION(0.06) }){
-        requires 'MouseX::AttributeHelpers' => 0.06;
+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"
+            );
+        }
     }
 }
 
 require 'lib/Mouse/Spec.pm'; # for the version
 
+#if(Mouse::Spec->MouseVersion =~ /_/){ # DEVEL RELEASE
+#    require Carp::Always; Carp::Always->import();
+#    include_deps 'Carp::Always';
+#}
+
 # cc_available recognizes the '--pp' and '--xs' options
 my $use_xs = ($] >= 5.008_001 && cc_available());