X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FOverriden.pm;h=4ea1254433c175a468b5fe87c26d0acc2369427e;hb=aead17e74252e3884f9f8e39912ca98fdf4b4dd5;hp=844c0f65e55a40c16c0696ef19ab07a1292144d9;hpb=330dbb079ab3e4ff26fb694c232b9c86b2d19161;p=gitmo%2FMoose.git

diff --git a/lib/Moose/Meta/Method/Overriden.pm b/lib/Moose/Meta/Method/Overriden.pm
index 844c0f6..4ea1254 100644
--- a/lib/Moose/Meta/Method/Overriden.pm
+++ b/lib/Moose/Meta/Method/Overriden.pm
@@ -3,9 +3,8 @@ package Moose::Meta::Method::Overriden;
 use strict;
 use warnings;
 
-use Carp 'confess';
-
-our $VERSION   = '0.55';
+our $VERSION   = '0.62';
+$VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
 use base 'Moose::Meta::Method';
@@ -24,7 +23,7 @@ sub new {
     my $super = $args{class}->find_next_method_by_name($name);
 
     (defined $super)
-        || confess "You cannot override '$name' because it has no super method";
+        || $class->throw_error("You cannot override '$name' because it has no super method", data => $name);
 
     my $super_body = $super->body;