Add a confess to intialize_body in the Moose::Meta::Method::Constructor, to catch...

diff --git a/lib/Moose/Meta/Method/Constructor.pm b/lib/Moose/Meta/Method/Constructor.pm
index 5261e43..d0ebad2 100644 (file)
--- a/lib/Moose/Meta/Method/Constructor.pm
+++ b/lib/Moose/Meta/Method/Constructor.pm
@@ -56,6 +56,10 @@ sub associated_metaclass { (shift)->{'$!associated_metaclass'} }
 
 ## method
 
+# this was changed in 0.41, but broke MooseX::Singleton, so try to catch
+# any other code using the original broken spelling
+sub intialize_body { confess "Please correct the spelling of 'intialize_body' to 'initialize_body'" }
+
 sub initialize_body {
     my $self = shift;
     # TODO: