Commit | Line | Data |
7f2e015b |
1 | package ScriptTestApp::TraitFor::Script::Bar; |
2 | use Moose::Role; |
eefc03e1 |
3 | use namespace::clean -except => [ 'meta' ]; |
7f2e015b |
4 | |
5 | around run => sub { |
6 | my ($orig, $self, @args) = @_; |
7 | return $self->$orig(@args) . '23'; |
8 | }; |
9 | |
10 | 1; |