add simple test for compatibility with MooseX::Role::Parameterized
Rafael Kitover [Thu, 5 Aug 2010 02:46:22 +0000 (22:46 -0400)]
t/07-parameterized-role.t [new file with mode: 0644]

diff --git a/t/07-parameterized-role.t b/t/07-parameterized-role.t
new file mode 100644 (file)
index 0000000..393b802
--- /dev/null
@@ -0,0 +1,25 @@
+use strict;
+use warnings;
+use Test::More;
+
+BEGIN {
+    unless (eval { require MooseX::Role::Parameterized }) {
+        plan skip_all => 'This test needs MooseX::Role::Parameterized';
+    }
+}
+
+eval <<'EOF';
+    package Role;
+    use MooseX::Role::Parameterized;
+    use MooseX::ClassAttribute;
+    role {};
+
+    package Class;
+    use Moose;
+    with 'Role';
+EOF
+
+ok((not $@), 'used MooseX::ClassAttribute in MooseX::Role::Parameterized role');
+diag $@ if $@;
+
+done_testing;