Add Moose::_get_caller for more backwards compat

diff --git a/lib/Moose.pm b/lib/Moose.pm
index 2edbffe..5eb3770 100644 (file)
--- a/lib/Moose.pm
+++ b/lib/Moose.pm
@@ -136,6 +136,11 @@ sub init_meta {
                            );
 }
 
+# This may be used in some older MooseX extensions.
+sub _get_caller {
+    goto &Moose::Exporter::_get_caller;
+}
+
 sub _init_meta {
     shift;
     my %args = @_;