first pass at testing

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

diff --git a/t/lib/One.pm b/t/lib/One.pm
new file mode 100644 (file)
index 0000000..519e901
--- /dev/null
+++ b/t/lib/One.pm
@@ -0,0 +1,11 @@
+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;