irc is bad for productivity

[gitmo/MooseX-Object-Pluggable.git] / t / lib / TestApp2 / Plugin / Foo / ExtensionFor / Baz.pm

diff --git a/t/lib/TestApp2/Plugin/Foo/ExtensionFor/Baz.pm b/t/lib/TestApp2/Plugin/Foo/ExtensionFor/Baz.pm
new file mode 100644 (file)
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;