X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F005_strict.t;h=9c79115a2c605e6eae331e36c27cf1287266a148;hb=40a0a2081957d55e49da795a9255db61be85fe2d;hp=a5d82c5dcb09685efca2bf92379bcb2269266c49;hpb=aabf4179f74c8607d8c9de5a1da07a5f2cb48b3b;p=gitmo%2FMooseX-Getopt.git diff --git a/t/005_strict.t b/t/005_strict.t index a5d82c5..9c79115 100644 --- a/t/005_strict.t +++ b/t/005_strict.t @@ -1,24 +1,22 @@ -#!/usr/bin/perl - use strict; use warnings; -use Test::More tests => 10; +use Test::More tests => 11; use Test::Fatal; +use Test::NoWarnings 1.04 ':early'; BEGIN { use_ok('MooseX::Getopt'); } { - package App; use Moose; with 'MooseX::Getopt::Strict'; has 'data' => ( - metaclass => 'Getopt', + traits => ['Getopt'], is => 'ro', isa => 'Str', default => 'file.dat', @@ -26,7 +24,7 @@ BEGIN { ); has 'cow' => ( - metaclass => 'Getopt', + traits => ['Getopt'], is => 'ro', isa => 'Str', default => 'moo',