X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2FDynamicMoose%2FRequireMethodModifiers.run;h=31816b71bbbec8b656aee00dd7224819c94be65e;hb=de63df59ae120441faa40ae1c8cbe00cd015c1ea;hp=5b594851ed319000afc5f26626434a1f3d136d05;hpb=e842cd1d0cc4efc62926318b4ed87e851635490d;p=gitmo%2FPerl-Critic-Dynamic-Moose.git

diff --git a/t/DynamicMoose/RequireMethodModifiers.run b/t/DynamicMoose/RequireMethodModifiers.run
index 5b59485..31816b7 100644
--- a/t/DynamicMoose/RequireMethodModifiers.run
+++ b/t/DynamicMoose/RequireMethodModifiers.run
@@ -254,3 +254,38 @@ extends 'Parent';
 
 before foo => sub {};
 sub foo {}
+
+#-----------------------------------------------------------------------------
+
+## name Wrapping an implicit override twice
+## failures 1
+## cut
+
+package Parent;
+use Moose;
+
+sub foo {}
+
+package Child;
+use Moose;
+extends 'Parent';
+
+before foo => sub {};
+before foo => sub {};
+sub foo {}
+
+#-----------------------------------------------------------------------------
+
+## name Imported functions
+## failures 0
+## cut
+
+package Parent;
+use Moose;
+use List::Util 'reduce';
+
+package Child;
+use Moose;
+extends 'Parent';
+use List::Util 'reduce';
+