X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FEval-WithLexicals.git;a=blobdiff_plain;f=lib%2FEval%2FWithLexicals%2FWithHintPersistence.pm;h=e95a00832e072f0f3cf5d3b183a212d3f760c574;hp=75e0433fd24f904891f1b349b7c1e70ef0905d06;hb=7f5d0805be4447406bbf7a5325ceb29085d9c06f;hpb=3fb66cc7c134ee8da56ac1378d87eb653c7b7619

diff --git a/lib/Eval/WithLexicals/WithHintPersistence.pm b/lib/Eval/WithLexicals/WithHintPersistence.pm
index 75e0433..e95a008 100644
--- a/lib/Eval/WithLexicals/WithHintPersistence.pm
+++ b/lib/Eval/WithLexicals/WithHintPersistence.pm
@@ -46,8 +46,7 @@ sub _capture_unroll_global {
   );
 }
 
-around setup_code => sub {
-  shift; # we bypass orig, i.e. using role as normal inheritance.
+sub setup_code {
   my($self) = @_;
   # Only run the prelude on the first eval, hints will be set after
   # that.