From: gfx <gfuji@cpan.org>
Date: Sat, 31 Oct 2009 03:43:09 +0000 (+0900)
Subject: Use Carp::Always in Makefile.PL when Mouse is in development releases
X-Git-Tag: 0.40_04~32
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=98f255c5b15681edff2b0933954e3a6b1e24a012;p=gitmo%2FMouse.git

Use Carp::Always in Makefile.PL when Mouse is in development releases
---

diff --git a/Makefile.PL b/Makefile.PL
index 1c2a121..189d868 100755
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -20,11 +20,17 @@ test_requires 'Test::More'      => 0.88;
 test_requires 'Test::Exception' => 0.27;
 # test_requires 'Test::Output'    => 0.16; # too many dependencies!
 
-
 include_deps 'Test::Exception'; # work around 0.27_0x (its use of diehook might be wrong)
 
 recommends 'MRO::Compat' if $] < 5.010;
 
+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 $use_xs;
 
 for (@ARGV) {
@@ -45,7 +51,7 @@ if(!defined $use_xs){
 
 if($use_xs){
     print "Mouse configured with XS.\n",
-          "You can try --pp option to configure it with Pure Perl.\n";
+          "NOTE: You can try --pp option to configure Mouse with Pure Perl.\n";
     ;
 
     require Module::Install::XSUtil;
@@ -60,8 +66,6 @@ else{
 }
 
 if (author_context()) {
-    local @INC = ('lib', @INC);
-    require 'lib/Mouse/Spec.pm';
     my $require_version = Mouse::Spec->MooseVersion;
 
     if (eval{ require Moose; Moose->VERSION($require_version) }) {