From: Alex J. G. Burzyński <ajgb@cpan.org>
Date: Fri, 5 Aug 2011 09:48:37 +0000 (+0100)
Subject: use Moo::_Utils::_get_linear_isa
X-Git-Tag: v0.009011~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e9adc6d3cc24cc51756887734375155bacb3ae05;p=gitmo%2FRole-Tiny.git

use Moo::_Utils::_get_linear_isa
---

diff --git a/lib/Method/Generate/BuildAll.pm b/lib/Method/Generate/BuildAll.pm
index ace0e28..1d6b5ad 100644
--- a/lib/Method/Generate/BuildAll.pm
+++ b/lib/Method/Generate/BuildAll.pm
@@ -3,7 +3,6 @@ package Method::Generate::BuildAll;
 use strictures 1;
 use base qw(Moo::Object);
 use Sub::Quote;
-use Moo::_mro;
 use Moo::_Utils;
 use B 'perlstring';
 
@@ -28,7 +27,7 @@ sub buildall_body_for {
   my @builds =
     grep *{_getglob($_)}{CODE},
     map "${_}::BUILD",
-    reverse @{mro::get_linear_isa($into)};
+    reverse @{Moo::_Utils::_get_linear_isa($into)};
   join '', map qq{    ${me}->${_}(${args});\n}, @builds;
 }