X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp2%2FPlugin%2FFoo%2FExtensionFor%2FBaz.pm;fp=t%2Flib%2FTestApp2%2FPlugin%2FFoo%2FExtensionFor%2FBaz.pm;h=7934fd6ca1c524125f65da2c658589b2b5c6a7bd;hb=208f7b2702330c0187b265df3d20ef1702de0640;hp=0000000000000000000000000000000000000000;hpb=06c9b7146066d4f18e5b17f00a7a49c8cb30b691;p=gitmo%2FMooseX-Object-Pluggable.git

diff --git a/t/lib/TestApp2/Plugin/Foo/ExtensionFor/Baz.pm b/t/lib/TestApp2/Plugin/Foo/ExtensionFor/Baz.pm
new file mode 100644
index 0000000..7934fd6
--- /dev/null
+++ b/t/lib/TestApp2/Plugin/Foo/ExtensionFor/Baz.pm
@@ -0,0 +1,13 @@
+package TestApp2::Plugin::Foo::ExtensionFor::Baz;
+
+use strict;
+use warnings;
+use Moose::Role;
+
+around baz => sub{ 
+    my $super = shift;
+    my $self = shift;
+    "foo'd baz 2 " . $super->($self);
+};
+
+1;