X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F100-erroneous-keywords.t;h=fabcecf0dc9a8ef4dda92fe280b6e8c7e1875963;hb=396466d48ca8d79a727cb7618d2a15ab1c0a1a78;hp=3405cc2502b47792f8ac1f681c3c6660597fd5a0;hpb=1d669b8ab5c0622b950c8bbfb212ac8831ac309c;p=gitmo%2FMooseX-Role-Parameterized.git diff --git a/t/100-erroneous-keywords.t b/t/100-erroneous-keywords.t index 3405cc2..fabcecf 100644 --- a/t/100-erroneous-keywords.t +++ b/t/100-erroneous-keywords.t @@ -1,7 +1,7 @@ #!/usr/bin/env perl use strict; use warnings; -use Test::More tests => 3; +use Test::More tests => 4; use Test::Exception; @@ -9,6 +9,10 @@ do { package MyRole::Storage; use MooseX::Role::Parameterized; + ::throws_ok { + parameter() + } qr/^You must provide a name for the parameter/; + role { ::throws_ok { extends 'MyRole::Parameterized';