first pass at testing

[gitmo/MooseX-Antlers.git] / t / lib / One.pm

package One;

use Moose;

my $called_foo = 0;

sub get_called_foo { $called_foo }

has foo => (is => 'rw', required => 1, trigger => sub { $called_foo++ });

1;