t/lib/TestApp/Plugin/Baz/ExtensionFor/Bar.pm

   1 package TestApp::Plugin::Baz::ExtensionFor::Bar;
   2
   3 use strict;
   4 use warnings;
   5 use Moose::Role;
   6
   7 around bar => sub{
   8     my ($super, $self) = @_;
   9     "baz'd bar  " . $super->($self);
  10 };
  11
  12 1;