X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F03configfile_method.t;h=0d1412295c9c1b9b02076e258ca28bed84c84fbd;hb=fcc2d1ec65a0886906a71dfb85b7cb13f3f377a3;hp=362ba2ffe290d38bd4f556b0f847dee28e33b8dd;hpb=742b859c0f89bf4dc325980079eb770771c1c709;p=gitmo%2FMooseX-ConfigFromFile.git

diff --git a/t/03configfile_method.t b/t/03configfile_method.t
index 362ba2f..0d14122 100644
--- a/t/03configfile_method.t
+++ b/t/03configfile_method.t
@@ -1,8 +1,9 @@
-#!/usr/bin/env perl 
 use strict;
-use Test::More;
-use Test::Fatal;
+use warnings;
 
+use Test::More tests => 7;
+use Test::NoWarnings 1.04 ':early';
+use Test::Fatal;
 
 my %config_from_file_args;
 {
@@ -53,5 +54,3 @@ is($config_from_file_args{B}, 'bar', 'B configfile attr default sub is called');
 is(exception { C->new_with_config() }, undef, 'C->new_with_config lives');
 is($config_from_file_args{C}, '/dir/C', 'C configfile attr default sub is called, with classname');
 
-
-done_testing();