X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FMethod.pm;h=de34db9897a4a7ad08e896919724cb875d841ae8;hb=e7cfb28b0b3e2b63404348eceb8d45b6a311c5bf;hp=f7126e8488c03467bf3d91274b4403a63913207e;hpb=d3c98e33af255bfa5e56ac681a4240d70fc8acf3;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Method.pm b/lib/Class/MOP/Method.pm index f7126e8..de34db9 100644 --- a/lib/Class/MOP/Method.pm +++ b/lib/Class/MOP/Method.pm @@ -18,15 +18,6 @@ use base 'Class::MOP::Object'; # they should act like CODE refs. use overload '&{}' => sub { $_[0]->body }, fallback => 1; -our $UPGRADE_ERROR_TEXT = q{ ---------------------------------------------------------- -NOTE: this error is likely not an error, but a regression -caused by the latest upgrade to Moose/Class::MOP. Consider -upgrading any MooseX::* modules to their latest versions -before spending too much time chasing this one down. ---------------------------------------------------------- -}; - # construction sub wrap { @@ -41,7 +32,7 @@ sub wrap { || confess "You must supply a CODE reference to bless, not (" . ($code || 'undef') . ")"; ($params{package_name} && $params{name}) - || confess "You must supply the package_name and name parameters $UPGRADE_ERROR_TEXT"; + || confess "You must supply the package_name and name parameters"; my $self = $class->_new(\%params);