X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F110_sort_usage_by_attr_order.t;h=c025680a32ae7153a9bc41be0aefe292ef6620df;hb=ede2de16018159d8e1d70f53aedece5ae2d4f299;hp=c7677e072852507ef95d91ca7ffa25e252962075;hpb=8d396d8a86e6c43b6722273362cab18b0fa622fc;p=gitmo%2FMooseX-Getopt.git diff --git a/t/110_sort_usage_by_attr_order.t b/t/110_sort_usage_by_attr_order.t index c7677e0..c025680 100644 --- a/t/110_sort_usage_by_attr_order.t +++ b/t/110_sort_usage_by_attr_order.t @@ -8,12 +8,14 @@ # early), followed by options added by parent classes and roles, and then # options added by this class. -use strict; use warnings; -use Test::More tests => 1; +use strict; +use warnings FATAL => 'all'; +use Test::More tests => 2; +use Test::Warnings; { package MyClass; - use strict; use warnings; + use strict; use warnings FATAL => 'all'; use Moose; with 'MooseX::Getopt';