X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FScriptTestApp%2FTraitFor%2FScript%2FBar.pm;fp=t%2Flib%2FScriptTestApp%2FTraitFor%2FScript%2FBar.pm;h=5d5ecc7fefc217f5bdd4b96676357667593e9fb6;hb=7f2e015bc9ef152ad836524da16299bd86a5a22b;hp=0000000000000000000000000000000000000000;hpb=fb897b361eec8544ac999ce96d812828818c0652;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/lib/ScriptTestApp/TraitFor/Script/Bar.pm b/t/lib/ScriptTestApp/TraitFor/Script/Bar.pm
new file mode 100644
index 0000000..5d5ecc7
--- /dev/null
+++ b/t/lib/ScriptTestApp/TraitFor/Script/Bar.pm
@@ -0,0 +1,10 @@
+package ScriptTestApp::TraitFor::Script::Bar;
+use Moose::Role;
+use namespace::autoclean;
+
+around run => sub {
+    my ($orig, $self, @args) = @_;
+    return $self->$orig(@args) . '23';
+};
+
+1;