t/07-parameterized-role.t

   1 use strict;
   2 use warnings;
   3 use Test::More;
   4
   5 BEGIN {
   6     unless (eval { require MooseX::Role::Parameterized }) {
   7         plan skip_all => 'This test needs MooseX::Role::Parameterized';
   8     }
   9 }
  10
  11 eval <<'EOF';
  12     package Role;
  13     use MooseX::Role::Parameterized;
  14     use MooseX::ClassAttribute;
  15     role {};
  16
  17     package Class;
  18     use Moose;
  19     with 'Role';
  20 EOF
  21
  22 ok((not $@), 'used MooseX::ClassAttribute in MooseX::Role::Parameterized role');
  23 diag $@ if $@;
  24
  25 done_testing;