summaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2008-12-06 18:08:12 -0500
committerdoy <doy@tozt.net>2008-12-06 18:08:12 -0500
commita3d55ee9f77fa9cf771c7d9ae811f940ac90e5f7 (patch)
tree21e9252faf756829a307c97e9d338ccd6a6054ba /t
parent79e9ff5d7dffc2c57a3447cf578894bee64ace4d (diff)
downloadmoosex-role-matcher-a3d55ee9f77fa9cf771c7d9ae811f940ac90e5f7.tar.gz
moosex-role-matcher-a3d55ee9f77fa9cf771c7d9ae811f940ac90e5f7.zip
start with tests
Diffstat (limited to 't')
-rw-r--r--t/000-load.t15
1 files changed, 15 insertions, 0 deletions
diff --git a/t/000-load.t b/t/000-load.t
new file mode 100644
index 0000000..5208130
--- /dev/null
+++ b/t/000-load.t
@@ -0,0 +1,15 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use Test::More tests => 2;
+
+package Foo;
+use Moose;
+with 'MooseX::Role::Matcher';
+
+package main;
+my $foo = Foo->new;
+ok($foo->does('MooseX::Role::Matcher'),
+ 'role consumption works');
+ok($foo->can('match'),
+ 'provided method exists');