X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F111_gld_pass_through.t;h=27670866a264466c55eceac1e80560416677e06b;hp=1a028616ce8953517f6b0a97f76879fa31dca6e0;hb=25eb430dc9dc0e223b0a8cddf555e0dc3bbd26aa;hpb=0611312e34f4d0e3668a2c9894df36dc945ffe74 diff --git a/t/111_gld_pass_through.t b/t/111_gld_pass_through.t index 1a02861..2767086 100644 --- a/t/111_gld_pass_through.t +++ b/t/111_gld_pass_through.t @@ -1,13 +1,10 @@ -#!/usr/bin/perl - use strict; -use warnings; +use warnings FATAL => 'all'; -use Test::More tests => 5; +use Test::More tests => 6; +use Test::Warnings; -use Test::Requires { - 'Getopt::Long::Descriptive' => 0.01, # skip all if not installed -}; +use Getopt::Long::Descriptive; use_ok('MooseX::Getopt::GLD'); @@ -18,7 +15,6 @@ use_ok('MooseX::Getopt::GLD'); with 'MooseX::Getopt::GLD' => { getopt_conf => [ 'pass_through' ] }; has 'foo' => ( - metaclass => 'Getopt', is => 'ro', isa => 'Int', ); @@ -31,7 +27,6 @@ use_ok('MooseX::Getopt::GLD'); with 'MooseX::Getopt::GLD' => { getopt_conf => [ 'pass_through' ] };; has 'bar' => ( - metaclass => 'Getopt', is => 'ro', isa => 'Int', );