X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010-required.t;h=0bf5f83cac9ddfebdbbd17c3785f7dbe1cb5d0b2;hb=59089ec36675c7df1998945b1446c37794f88306;hp=3a8be4c43ca80695d06bd0e183fd823442a8ec39;hpb=c3398f5bd45f2851b7cd40ca9823bcf7d2378469;p=gitmo%2FMouse.git diff --git a/t/010-required.t b/t/010-required.t index 3a8be4c..0bf5f83 100644 --- a/t/010-required.t +++ b/t/010-required.t @@ -2,7 +2,7 @@ use strict; use warnings; use Test::More tests => 3; -use Test::Exception; +use Mouse::Util ':test'; do { package Class; @@ -30,7 +30,7 @@ do { ); }; -throws_ok { Class->new } qr/Attribute 'foo' is required/, "required attribute is required"; +throws_ok { Class->new } qr/Attribute \(foo\) is required/, "required attribute is required"; lives_ok { Class->new(foo => 5) } "foo is the only required but unfulfilled attribute"; lives_ok { Class->new(foo => 1, bar => 1, baz => 1, quux => 1) } "all attributes specified";