X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FUtil.pm;h=8923749e7915b1e15cf4fbc49f8d6dec49cbec02;hb=87ca293be7ca0041bbb86ad9609a498fb2010f4f;hp=b51f7bc81f6ed7c00c124e0ab7e29e6bbff0033d;hpb=8e64d0fa5da64639074f77d3da9b2f7aa20cce93;p=gitmo%2FMouse.git

diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm
index b51f7bc..8923749 100644
--- a/lib/Mouse/Util.pm
+++ b/lib/Mouse/Util.pm
@@ -281,8 +281,8 @@ sub not_supported{
 
     $feature ||= ( caller(1) )[3]; # subroutine name
 
-    local $Carp::CarpLevel = $Carp::CarpLevel + 2;
-    Carp::croak("Mouse does not currently support $feature");
+    local $Carp::CarpLevel = $Carp::CarpLevel + 1;
+    Carp::confess("Mouse does not currently support $feature");
 }
 
 1;