remove shebangs; use warnings and Test::NoWarnings

diff --git a/t/01use.t b/t/01use.t
index 80a4331..c2e38c0 100644 (file)
--- a/t/01use.t
+++ b/t/01use.t
@@ -1,9 +1,8 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;
 
-use Test::More tests => 1;
+use Test::More tests => 2;
+use Test::NoWarnings 1.04 ':early';
 
 BEGIN {
     use_ok('MooseX::ConfigFromFile');

diff --git a/t/02subclass.t b/t/02subclass.t
index dc9aebd..477f8b2 100644 (file)
--- a/t/02subclass.t
+++ b/t/02subclass.t
@@ -1,7 +1,10 @@
-#!/usr/bin/env perl 
 use strict;
-use Test::More;
+use warnings;
+
+use Test::More tests => 3;
 use Test::Fatal;
+use Test::NoWarnings 1.04 ':early';
+
 {
     package A;
     use Moose;
@@ -19,4 +22,3 @@ use Test::Fatal;
 ok(B->does('MooseX::ConfigFromFile'), 'B does ConfigFromFile');
 is(exception { B->new_with_config() }, undef, 'B->new_with_config lives');
 
-done_testing();

diff --git a/t/03configfile_method.t b/t/03configfile_method.t
index 362ba2f..0d14122 100644 (file)
--- 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();