[gitmo/MooseX-Object-Pluggable.git] / t / lib / TestApp / Plugin / Bar.pm

package TestApp::Plugin::Bar;

use strict;
use warnings;
use Moose::Role;

has 'bar_value' => (is => 'rw', required => 1, isa => 'Str',
		    default => 'Fucker'
		   );

around bar => sub{ 'override bar' };

1;
Commit	Line	Data
421e9f8d	1	package TestApp::Plugin::Bar;
	2
	3	use strict;
	4	use warnings;
	5	use Moose::Role;
	6
44b04eb5	7	has 'bar_value' => (is => 'rw', required => 1, isa => 'Str',
	8	default => 'Fucker'
	9	);
	10
421e9f8d	11	around bar => sub{ 'override bar' };
	12
	13	1;