X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FMethod%2FConstructor.pm;h=372620caf70f60c04a7ec1b2c9b97d85632dbd7a;hb=32202ce2c416e23995519724fd8340de25e7ff2b;hp=9a71a708c46b71447b296a3dbd6a5ce898d3f02a;hpb=ae234dc6e9fff0fbe75a405a4de51fd08281e003;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Method/Constructor.pm b/lib/Class/MOP/Method/Constructor.pm index 9a71a70..372620c 100644 --- a/lib/Class/MOP/Method/Constructor.pm +++ b/lib/Class/MOP/Method/Constructor.pm @@ -7,7 +7,7 @@ use warnings; use Carp 'confess'; use Scalar::Util 'blessed', 'weaken', 'looks_like_number'; -our $VERSION = '0.05'; +our $VERSION = '0.06'; our $AUTHORITY = 'cpan:STEVAN'; use base 'Class::MOP::Method::Generated'; @@ -21,7 +21,7 @@ sub new { if $options{is_inline}; ($options{package_name} && $options{name}) - || confess "You must supply the package_name and name parameters"; + || confess "You must supply the package_name and name parameters $Class::MOP::Method::UPGRADE_ERROR_TEXT"; my $self = bless { # from our superclass