test cleanup
[p5sagit/App-FatPacker.git] / t / pack.t
index c88b9e1..16bc91a 100644 (file)
--- a/t/pack.t
+++ b/t/pack.t
@@ -1,4 +1,3 @@
-#!perl
 use strict;
 use warnings FATAL => 'all';
 use Test::More qw(no_plan);
@@ -9,7 +8,7 @@ use File::Temp qw/tempdir/;
 use File::Spec;
 use Cwd;
 
-BEGIN { use_ok "App::FatPacker", "" }
+use App::FatPacker;
 
 my $keep = $ENV{'FATPACKER_KEEP_TESTDIR'};
 my $tempdir = tempdir($keep ? (CLEANUP => 0) : (CLEANUP => 1));
@@ -54,6 +53,7 @@ require $temp_fh;
         't/mod/b.pm',
         't/mod/c.pm',
         't/mod/cond.pm',
+        't/mod/d.pm',
     ], "\$INC[0]->files returned the files" );
 
 }