Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 0e3802d286
Fetching contributors…

Cannot retrieve contributors at this time

37 lines (29 sloc) 0.746 kb
#!/usr/bin/env perl
use strict;
use warnings;
use Test::More tests => 4;
use Test::Exception;
do {
package MyRole;
use MooseX::Role::Parameterized;
::throws_ok {
parameter 'alias';
} qr/^The parameter name \(alias\) is currently forbidden/;
::throws_ok {
parameter 'excludes';
} qr/^The parameter name \(excludes\) is currently forbidden/;
};
do {
package MyClass;
use MooseX::Role::Parameterized;
::throws_ok {
with MyRole => {
alias => 1,
};
} qr/^The parameter name \(alias\) is currently forbidden/;
::throws_ok {
with MyRole => {
excludes => 1,
};
} qr/^The parameter name \(excludes\) is currently forbidden/;
};
Jump to Line
Something went wrong with that request. Please try again.